- Katılım
- 5 Haziran 2007
- Mesajlar
- 64
- Excel Vers. ve Dili
- 2007
Türkçe
Merhaba kolay gelsin. İş Gezileri Gider bildirimi ile ilgili bir tablo hazırlıyorum ve bu tablonun bazı yerlerinde işin içinden çıkamadığım için yardım istemekteyim. birden fazla sorum olacak sanırım, şimdiden vaktinizi aldığım için özür dilerim.
Sorumu bir örnekle anlatayım, Ali isminde bir memur olsun. Hem “hafta içi” hem de “hafta sonu” sayfasına kayıt yapılacak. Hafta içine ilk sıraya yazılacağı için “M1” sayfasına, Hafta Sonuna da ilk sırada kayıt yapılacağı için “M1 (2)” sayfasına otomatik olarak ismi yazılacak (her ikisinde de F7 hücresine yazılacak). Daha sonra aynı şekilde şoförler S1, S2, S3,… ile “S1 (2)”, “S2 (2)”, “S3 (2)” sayfalarına , güvenlikler de benzer şekilde G1, G2, G3… sayfalarına yazılacak. Ama ben direkt olarak bu sayfalara isim yazmayacağım, ben “hafta içi” ve “hafta sonu” sayfalarına yazacağım, o sayfalarda hangi satıra yazdıysam o ismin solunda görünen sayfalara otomatik olarak yazılacak (sadece F7 hücresine). Ve “hafta içi” ve “hafta sonu” sayfalarında o ismin üstüne tıklayınca ilgili sayfaya geçmek istiyorum. Ancak zaman zaman isimler değişebilecek veya silinebilecek. Ben köprü kullanarak yaptım ama ismi silince köprü de silindi.
Şimdiden yardımlarınız için teşekkür ederim.
Saygılarımla, İsmail.
NOT: Örnek dosya ektedir. Dosya da makrolar mevcuttur, uyarı verirse diye belirteyim istedim.
NOT-2: Çalışma kitabım yaklaşık 300 sayfadan oluşacak. “Hafta İçi” ve “Hafta Sonu” sayfalarında yer alan kayıt kadar sayfa olacak.
EDİT:
"hafta içi" ve "hafta sonu" sayfalarında M1, M2, G1 ... yazan yerlere buton ekleyip
Sub Makro1()
ActiveSheet.Shapes.Range(Array("Button 2")).Select
Sheets("G1").Select
End Sub
kodlarını yazarak istediğim sayfaya gidebiliyorum. İstediğim böyle bir şey ama bunun makro yazıp butonlara tıklayarak değil direkt isimlerin üzerine tıklayınca gerçekleşmesini istiyorum. Çünkü yaklaşık bu şekilde 300 sayfa olacak ve her biri için yukarıdaki kodları düzenlemem gerekecek. Tabi başka bir yolu yoksa mecburen bu şekilde yapacağım. Gerek forumda gerekse nette biraz araştırma yaptım ama bulamadım.
Sorumu bir örnekle anlatayım, Ali isminde bir memur olsun. Hem “hafta içi” hem de “hafta sonu” sayfasına kayıt yapılacak. Hafta içine ilk sıraya yazılacağı için “M1” sayfasına, Hafta Sonuna da ilk sırada kayıt yapılacağı için “M1 (2)” sayfasına otomatik olarak ismi yazılacak (her ikisinde de F7 hücresine yazılacak). Daha sonra aynı şekilde şoförler S1, S2, S3,… ile “S1 (2)”, “S2 (2)”, “S3 (2)” sayfalarına , güvenlikler de benzer şekilde G1, G2, G3… sayfalarına yazılacak. Ama ben direkt olarak bu sayfalara isim yazmayacağım, ben “hafta içi” ve “hafta sonu” sayfalarına yazacağım, o sayfalarda hangi satıra yazdıysam o ismin solunda görünen sayfalara otomatik olarak yazılacak (sadece F7 hücresine). Ve “hafta içi” ve “hafta sonu” sayfalarında o ismin üstüne tıklayınca ilgili sayfaya geçmek istiyorum. Ancak zaman zaman isimler değişebilecek veya silinebilecek. Ben köprü kullanarak yaptım ama ismi silince köprü de silindi.
Şimdiden yardımlarınız için teşekkür ederim.
Saygılarımla, İsmail.
NOT: Örnek dosya ektedir. Dosya da makrolar mevcuttur, uyarı verirse diye belirteyim istedim.
NOT-2: Çalışma kitabım yaklaşık 300 sayfadan oluşacak. “Hafta İçi” ve “Hafta Sonu” sayfalarında yer alan kayıt kadar sayfa olacak.
EDİT:
"hafta içi" ve "hafta sonu" sayfalarında M1, M2, G1 ... yazan yerlere buton ekleyip
Sub Makro1()
ActiveSheet.Shapes.Range(Array("Button 2")).Select
Sheets("G1").Select
End Sub
kodlarını yazarak istediğim sayfaya gidebiliyorum. İstediğim böyle bir şey ama bunun makro yazıp butonlara tıklayarak değil direkt isimlerin üzerine tıklayınca gerçekleşmesini istiyorum. Çünkü yaklaşık bu şekilde 300 sayfa olacak ve her biri için yukarıdaki kodları düzenlemem gerekecek. Tabi başka bir yolu yoksa mecburen bu şekilde yapacağım. Gerek forumda gerekse nette biraz araştırma yaptım ama bulamadım.
Son düzenleme: