aktif sayfa sorunu

Katılım
23 Şubat 2024
Mesajlar
16
Excel Vers. ve Dili
2016 excel
Arkadaşlar merhaba.

Dünya ve belki de sizin için küçük ama benim için büyük sayılabielcek bir konuda yardıma ihtiyacım var.

İleri seviye kullanıcıların eminim iki dakika içinde cevap verebileceği bir konu ancak ben içinden çıkamadım.

Yazmadan önce, her zaman olduğu gibi forumda, ve diğer sitelerde, hatta yapay zeka arkadaşa bile sordum ancak doğru cevabı bulamadım.

Hani insanın basireti bağlanır ya bazen, belki de ondan.

Gelelim soruma.

Kodu ve dosyamda kullandığım isimleri aynen gönderiyorum, değişiklik yapıp yazabilirseniz çok memnun olurum.

Artık noktadan mı, virgülden mi bilemediğim için kod istedim, affınıza sığınırım.

İki çalışma sayfalı bir excel dosyam var.

İlk sayfanın adı sorgu, diğeri ise database.

Oluşturduğum VBA formunu (form 1 diyelim) hangi sayfada açarsam açayım (formun altındaki kod, Vlookup ile database sayfasından veri çekmek üzere kodlandı) problem yok, iki sayfada da çalışıyor.

Ancak, database sayfasına yazı yazacak başka bir komut içeren VBA formu (buna da form 2 diyelim), sadece database sayfası açıkken, yani bu sayfa aktifken yazdırma işlemi yapıyor.

Diğer sayfayı açarak, yazdırma komutunun olduğu formu açtığımda kod hata veriyor.

Yani sorgularken bir problem yok, ama yazarken mutlaka database sayfasını arıyor.

Sorunun ne olduğunu biliyorum, dediğim gibi tüm argüman ve olsaklıkları denedim ama bir yerde hata yapıyorum.

Butonun altındaki kodu aşağıda yazıyorum.

Range("B:B").Find(aranan).Select

Tahmin ettiğiniz gibi aranan adlı bir değişkenim var, onu database sayfasının (neden database sayfası?) B sütünunda arıyor, bulunca seçiyor.

Ben, hedef olarak database sayfasının B kolonunu göstermek istiyorum.

Range, worksheet, worksheets, worksheet.range artık ne denedi isem de olmadı.

Umarım cevap bulabilirim, saygılar...
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
41,746
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Verdiğiniz kodun üstüne aşağıdaki satırı ekleyip deneyiniz.

Sheets("database").Select
 
Katılım
23 Şubat 2024
Mesajlar
16
Excel Vers. ve Dili
2016 excel
Verdiğiniz kodun üstüne aşağıdaki satırı ekleyip deneyiniz.

Sheets("database").Select
Korhan hocam selamlar.
Öncelikle kısa süredeki dönüşün için teşekkür ediyorum.
Soruma kısmen cevap bulabildim, kısmen diyorum çünkü bildiğin gibi excel derya deniz, yeni şeyler yaptıkça, yeni şeyler uyguladıkça öğreniyorum vba kısmını.
Öngörmediğim bir şey oldu.

Tekrar yazmadan önce düşündüm, ama genelden çok spesifik bir konu olduğu için yeniden yardım talep ediyorum. Mümkün ise cevaplayacağından şüphem yok.

Dosyada dediğim gibi iki sayfa var. Sayfalardan biri formları çalıştırmak için kullandığım active x düğmelerini barındırıyor, diğer sayfada ise bir tablo var. Bir plaka numarası düşün, bunun karşılık geldiği aracın marka, model ve renk bilgileri tablosu gibi. Tabiki veri oldukça uzun.
İlk sayfadaki active x düğmesi bir formu açıyor, bu form açılınca (formdaki diğer textboxlar disable) yazılabilir alana bir plaka girdiğimde, ikinci sayfadaki tabloda bu plakaya karşılık gelen bilgiler bu disable textboxlara geliyor (vlookup ile) Bunları disable yapmamın sebebi veriyi yanlışlık ile değiştirmemek. Bu arada diğer sayfayı gizlediğimi belirteyim. Yine aynı formdaki bir komut, yeni bir plaka, model, marka ve renk girdiğimde gizli olsa dahi ikinci sayfaya bu bilgileri ekliyor.


İkinci activex butonu başka bir formu açıyor. Bu form bilgileri güncellemek için.
Sorun şu ki gönderdiğin kodu dediğin şekilde kendi kodumun üstüne ekledim, ancak bu sırada gizli olan sayfayı görünür yapıyor.

Yani yeni bir veri girerken ya da sorgu yaparken tabloyu barındıran sayfa aktif olsun ya da olmasın, veyahut sayfa gizli olsun ya da olmasın sorun yok. Ancak güncelleme butonu var olan bir veriyi değiştirerek kaydetmek istediğimde neden gizli olan bir sayfayı görünür yapar.
Spesifik dediğim konu buydu, tam olarak bu şekilde bir soru forumda var mı bilemiyorum, affına sığınarak tekrardan sana iletiyorum.

Arzu edersen dosyayı paylaşım sitelerine ekleyebilirim (böyle bir imkan olduğunu forumda görmüştüm)
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
41,746
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Önerdiğim kod gizli sayfayı göstermez. Sizin dosyanızda buna sebep olan başka bir kod bloğu olabilir..
 
Üst