Skip to main content

AccessTr.neT


excellde sayfalar arası google earth şeklinde veri bulma

excellde sayfalar arası google earth şeklinde veri bulma

Çözüldü #13
(09/05/2011, 14:40)derer yazdı: bunda anlamayacak ne var acaba excelde sayfa 1 de yazdığım kodların üstüne tıkladığımda sayfa 2 deki ona karşılık gelen kodları bulup yerini göstersin demek istiyorum (örn; he8 tıkladığımda diğer sayfadaki yerleşim planında he8i bulsun mouse işareti üstüne gelsin )

Bunda anlamayacak ne var diyorsunda anlaşılmıyor işte. Senin anlaman demek bizimde anlayacağımız anlamına gelmiyor. Konu başlığında Google Earth yazmışsın soruda ise bundan hiç bahsetmemişsin.

"sayfa 1 de yazdığım kodların üstüne tıkladığımda sayfa 2 deki ona karşılık gelen kodları bulup"

bu nedemek şimdi? Önce bir yazdığınızın ne anlama gelebileceğini idrak edin ondan sonra sorunuzu yazın. Bir sonraki mesajınızda da önceki gibi ukalalık etmeye kalkışmayın size yardımcı olmaya çalışanların kıymetini bilin.

AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
Çözüldü #14
Sn Alpeki çok haklı... Sizler konuyla içiçe olduğunuzdan yazdıklarınızın yeterli olduğunu düşünüyorsunuz....

Bende anladığım kadarı ile bir cevap yazdım...

Lütfen incelermisiniz...

HE-7 ve HE-11 için istenileni yaptım gerisiniz sanırım halledersiniz...
.rar -pres yerleşim planı.rar (Dosya Boyutu: 39,13 KB | İndirme Sayısı: 35)
Please return your positive or negative ...
Cevapla
Çözüldü #15
Teşekkür ederim hocam tam ben ekleyecektim sizin yaptığınızı görünce teşekkür edeyim dedim sorununuz çözüme kavuşmuştur.
Sn; derer
Cevapla
Çözüldü #16
teşekkür ederim tam istediğim gibi olmuş fakat nasıl yaptığınızı anlatabilirmisiniz hocam bir bilgi daha öğrenmiş olurum
derer, 14-06-2010 tarihinden beri AccessTr.neT Ãœyesidir.
Cevapla
Çözüldü #17
Sn derer Vba kodlarında...
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If ActiveCell.Value = "HE-7" Then
Sheets("Sayfa2").Select
ActiveSheet.Shapes("Picture 157").Select
GoTo 10
End If
If ActiveCell.Value = "HE-11" Then
Sheets("Sayfa2").Select
ActiveSheet.Shapes("Picture 49").Select
GoTo 10
End If
MsgBox ("Tanımsız")
10
End Sub

Burada gördüğünüz gibi HE-7 ve HE-11 için bu işlem yapılmış. Sizin yapacağınız diğer durumlara karşılık gelen resim nolarını tespit edip bu rutini tekrarlamak.

İyi çalışmalar.

Please return your positive or negative ...
Cevapla
Çözüldü #18
teşekkür ederim. iyi çalışmalar.
derer, 14-06-2010 tarihinden beri AccessTr.neT Ãœyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task