- Katılım
- 5 Nisan 2007
- Mesajlar
- 413
- Excel Vers. ve Dili
- excel 2010 tr
Sub Makro3()
'
' Makro3 Makro
' Makro Şeref İnal tarafından 23.01.1999 tarihinde kaydedildi.
'
' Klavye Kısayolu: Ctrl+g
'
Sheets("yemler").Select
Range("B6").Select
End Sub
sheets yemler sayfasında
B6;B55 ve daha sonra eklenebilecek isimleride göze alarak
diyelimki B;54 ' ün üstüne gelip ctrl+g tuşuna bastığımızda...
sheets rasyon sayfasında B6;B55 arasındaki dolulardan sonraki ilk boş satıra ve bir sonraki seçilende yine bir sonraki satıra
yani özetle şu anda sheets rasyon sayfasında en son dolu satır
B15 sheets yemlerde B22 satırını ctrl+q ile seçelim ve sheets rasyon B16' ya aktarsın ve daha sonra B17,18,19,20 gibi inşallah açıklayabildim.?
ve eklenecek verileri de göze alarak
'
' Makro3 Makro
' Makro Şeref İnal tarafından 23.01.1999 tarihinde kaydedildi.
'
' Klavye Kısayolu: Ctrl+g
'
Sheets("yemler").Select
Range("B6").Select
End Sub
sheets yemler sayfasında
B6;B55 ve daha sonra eklenebilecek isimleride göze alarak
diyelimki B;54 ' ün üstüne gelip ctrl+g tuşuna bastığımızda...
sheets rasyon sayfasında B6;B55 arasındaki dolulardan sonraki ilk boş satıra ve bir sonraki seçilende yine bir sonraki satıra
yani özetle şu anda sheets rasyon sayfasında en son dolu satır
B15 sheets yemlerde B22 satırını ctrl+q ile seçelim ve sheets rasyon B16' ya aktarsın ve daha sonra B17,18,19,20 gibi inşallah açıklayabildim.?
ve eklenecek verileri de göze alarak