Ad Tanımlama (Name Manager)

besen

Altın Üye
Katılım
23 Mart 2007
Mesajlar
638
Excel Vers. ve Dili
excel 2019
İngilizce
Merhaba excelde tanımlanmış, "Ad Tanımlama (Name Manager) verilerini, başka bir excel dosyasına aktarılabilinir mi?

Teşekkür ederim.
 

Haluk

𐱅𐰇𐰼𐰚
Katılım
7 Temmuz 2004
Mesajlar
12,270
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
VBA ile yapılabilir....

Ad tanımlamalarının yapılmış olduğu dosyaya aşağıdaki kodu yazın, tanımlamaların taşınacağı diğer dosyayı da açın (Book2.xlsx).

Her iki dosya da açıkken, kodu çalıştırın ...

Kod:
Sub Test()
    For Each objName In ThisWorkbook.Names
      Workbooks("Book2.xlsx").Names.Add Name:=objName.Name, RefersTo:=objName.Value
   Next
End Sub
.
 

turist

Destek Ekibi
Destek Ekibi
Katılım
18 Kasım 2009
Mesajlar
5,102
Excel Vers. ve Dili
2013 64Bit
English
Böyle bir kodla deneyin.
Sub CopyNames()
Dim Source As Workbook
Dim Target As Workbook
Dim n As Name


Set Source = ActiveWorkbook
Set Target = Workbooks("Book2.xlsx")


For Each n In Source.Names
Target.Names.Add Name:=n.Name, RefersTo:=n.Value
Next

End Sub
Workbooks("Book2.xlsx") kısmına başka excel dosyasını yazınız
.

Kaynak:https://excelribbon.tips.net/T008811_Copying_Named_Ranges.html
 

besen

Altın Üye
Katılım
23 Mart 2007
Mesajlar
638
Excel Vers. ve Dili
excel 2019
İngilizce
Teşekkür ederim.

Kodu tanımlamaların olduğu dosyada modüle yazdım. Book2.xlsx diye bir dosya yarattım.
Ancak olmadı.excel.png
 

Haluk

𐱅𐰇𐰼𐰚
Katılım
7 Temmuz 2004
Mesajlar
12,270
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Normal şartlarda çalışması gerekir ..... Sizdeki sorun Ad tanımlamalarınızın içeriğinden kaynaklanabilir belki. Dosyayı görmeden bir şey diyemem.

.
 
Üst