• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Soru clipboard dan alınan verilere ön ek

  • Konbuyu başlatan Konbuyu başlatan k0081
  • Başlangıç tarihi Başlangıç tarihi
Katılım
17 Haziran 2008
Mesajlar
1,874
Excel Vers. ve Dili
Microsoft Ofis Profesyonel 2019 x64 TR
Merhaba arkadaşlar;

hafızadaki verileri txt dosyasına yazdırıyorum. bu kod ile...

With txtaciklama
.SelStart = 0
.SelLength = Len(.Text)
Clipboard.SetText txtaciklama, vbCFText
End With
dosyaadi = "Kopyala"
komut_txt = Clipboard.GetText
txtdosya = (CurDir & "\" & dosyaadi & ".txt")
If Len(Dir(txtdosya)) > 1 Then Kill txtdosya
Open txtdosya For Output As 1
Print #1, komut_txt
Close

komut_txt değişkenin önüne bir ek değişken belirtmem gerekiyor. bunu nasıl yapabilirim ?
 
Şöyle deneyin ..

Kod:
strVal = "Falan filan"

komut_txt = strVal & Clipboard.GetText

.
 
Hocam Tek satır değil. çoklu..

bunu daha önce denemiştim. sadece ilk satıra yazıyor..
 
Probleminizin detaylarını basit bir örnekle baştan anlatsanız, ona göre çözüm bulurduk ....

Kolay gelsin ...

.
 
kod içinde yazıyor.. sağolun.
 
***************** BU KONU ÇÖZÜMLENMİŞTİR **************************
 
Geri
Üst