Makro'ya İlave, C Sürücüsündeki Dosyada Kayıtlı Sayfaya

1Al2Ver

Altın Üye
Katılım
5 Kasım 2007
Mesajlar
4,708
Excel Vers. ve Dili
64 Bit TR - Microsoft Office 365 - Win11 Home
Merhaba,

Aşağıdaki makronun aynı zamanda;

C sürücüsü, YEMEK TAKİP isimli dosyadaki, Yemek_Çizelgesi sayfasına da kayıt yapmasını arzuluyorum,

Bu sayfanın (Yemek_Çizelgesi) sayfa koruma parolası ; 123'tür.

Sub YEMEK_KAYIT()

Set yk = Sheets("YEMEK_KAYIT")
Set yl = Sheets("YEMEK_LİSTESİ")

yl.Unprotect Password:="1"

yk.[C2:C8].Copy

yl.Cells(yl.Cells(Rows.Count, "B").End(xlUp).Row + 1, "B") _
.PasteSpecial Paste:=xlPasteValues, Transpose:=True

yk.Range("C3:C7").ClearContents

yl.Protect Password:="1"

Sheets("YEMEK_KAYIT").Select

End Sub

Teşekkür ederim.
 

1Al2Ver

Altın Üye
Katılım
5 Kasım 2007
Mesajlar
4,708
Excel Vers. ve Dili
64 Bit TR - Microsoft Office 365 - Win11 Home
Merhaba,

Konu Günceldir...
 

1Al2Ver

Altın Üye
Katılım
5 Kasım 2007
Mesajlar
4,708
Excel Vers. ve Dili
64 Bit TR - Microsoft Office 365 - Win11 Home
Konu Günceldir...
 

1Al2Ver

Altın Üye
Katılım
5 Kasım 2007
Mesajlar
4,708
Excel Vers. ve Dili
64 Bit TR - Microsoft Office 365 - Win11 Home
Konu Günceldir...
 

1Al2Ver

Altın Üye
Katılım
5 Kasım 2007
Mesajlar
4,708
Excel Vers. ve Dili
64 Bit TR - Microsoft Office 365 - Win11 Home
Merhaba,

Konu Günceldir...
 

1Al2Ver

Altın Üye
Katılım
5 Kasım 2007
Mesajlar
4,708
Excel Vers. ve Dili
64 Bit TR - Microsoft Office 365 - Win11 Home
Konu Günceldir..
 

1Al2Ver

Altın Üye
Katılım
5 Kasım 2007
Mesajlar
4,708
Excel Vers. ve Dili
64 Bit TR - Microsoft Office 365 - Win11 Home
Merhaba,

Konu Günceldir...
 
Üst