Kopyaladığım verinin herhangi bir yere yapıştırdığımda oluşan " (tırnak) sorunu hk

[u.L.a.s]

Kopyaladığım verinin herhangi bir yere yapıştırdığımda oluşan " (tırnak) sorunu hk

Merhabalar

elimde aşağıdaki gibi bir kod düzeni var. B-*u kod düzeni userform üzerinde-bir label içerisindeki alt alta 8-10 satırdan oluşan bir veri var. bu veriyi excel çalışma sayfasında her satırını B6:B15 aralığına yazıyor.

If OptionButton7.Value = True Then
a = Split(Label110, Chr(10))
x = 7
For i = 1 To UBound(a) + 1
Cells(x, "b") = a(i - 1)
x = x + 1
Next i
ElseIf OptionButton8.Value = True Then
a = Split(Label112, Chr(10))
x = 7
For i = 1 To UBound(a) + 1
Cells(x, "b") = a(i - 1)
x = x + 1
Next i

Daha sonra ikinci bir userformda bir buton ile aşağıdaki kod düzeneğinde bir çok veriyi kopyala yaptırıyorum. daha sonra başka bir yere yapıştır dediğimde. Sadece label içerisinde giden verilerim her nasıl oluyorsa başına ve sonuna tırnak işareti geliyor. büyük olasılık FileFormat:=xlTextPrinter gibi bir kod daha işletilmesi gerekiyor. ancak o zaman " " işaretleri kalkar gibi geliyor.

Sheets("Sheet1").Range("A33:A94").Copy

konu hususunda bilgi ve yardımlarınızı rica ederim