- Katılım
- 30 Mart 2010
- Mesajlar
- 240
- Excel Vers. ve Dili
- 2007,2010,2013
- Altın Üyelik Bitiş Tarihi
- 29-05-2021
Merhaba, koddaki yenidata'nın sonuna değişkeni de eklemek istiyorum. Yardımcı olabilecek var mıdır?
Sayfa1 B1'deki değer 00xBA742A
Olması gereken çıktı:
Anahtar00xBA742A1
Anahtar00xBA742A2
Anahtar00xBA742A3
.
.
Şimdiden teşekkürler.
Sayfa1 B1'deki değer 00xBA742A
Olması gereken çıktı:
Anahtar00xBA742A1
Anahtar00xBA742A2
Anahtar00xBA742A3
.
.
Kod:
Sub en_yeni()
Dim yenidata As Variant
Dim i As Variant
For i = 1 To 4
yenidata = "Anahtar" + Worksheets("Sayfa1").Range("B1").Value
Next i
End Sub
Şimdiden teşekkürler.