VBA ile Excelden Programa Değer Yapıştırma Sorunu

[duyaduya]

Selam Arkadaşalr
İş yerimdeki diğer birimler bana Excel tabloları ile yüklü miktarda Şahısların TC. Kimlik No ,hizmet aldığı birim ,Telefon no adres bilgilerini göndermekte. VBA ile; kişilerin hizmet aldığı birim ,Telefon no, adres bilgilerini hızı bir şekilde kopyalayıp Şirket programına yapıştıra biliyorum. Ancak kullandığımız programa , VBA ile TC kimlik No hücresini yapıştıramıyorum . Mause ile o hücreye çift tıklayıp hücrenin içine girdikten sonra Tc kimlik noyu kopyalayıp yapıştıra biliyorum. Eğer Tc Kimlik noyu Vba ile ” mause ile çift tıklayıp kopyaladığım gibi koplayabilrsem sorunum kalmayacak.
Kulandığım Vba kodu ;
Sub Düğme1_Tıklat()
Range("d1").Select
Selection.Copy
End Sub
Yardımcı olursanız sevinirim.Saygılar

 

[Ömer]

Merhaba,

Bu şekilde deneyin.

Sub Düğme1_Tıklat()
 
   [COLOR=green]'www.mrexcel.com/forum/showthread.php?t=462316[/COLOR]
    With GetObject("New:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}")
        .SetText Range("D1").Value
        .PutInClipboard
    End With
 
End Sub

.

 

[duyaduya]

Allah razı olsun Ömer Bey

:yazici:Allah razı olsun Ömer Bey Çalıştı.Çok çok Teşekkür ederim. Saygılar Sevgiler