Makroda CALL Komutu

[buyocan]

İyi günler. Benim makrolarımın olduğu sayfam var. Yapmak istediğim CALL yanına değişken hücre adresindeki değeri yazdırıp makroyu başlatmak. Yardım edenlere şimdiden teşekkürler. İyi çalışmalar.

Sub Deneme()
Saat = Sheets("Hesaplama").Range("N2")
Call Saat ' Burada Saati nasıl kabul ettirebilirim. Hata veriyor ?
End Sub

 

[Haluk]

Yapmak istediğinizi anlamadım ..... Makronuz çalışsaydı ne olmasını bekliyordunuz?

.

 

[buyocan]

Yapmak istediğinizi anlamadım ..... Makronuz çalışsaydı ne olmasını bekliyordunuz?

.

Şöyle bir şey yapmak istiyorum
Saat = Sheets("Hesaplama").Range("N2")
N2 hücresi sürekli değeri değişiyor. N2 değerine denk gelen makroyu çalıştırmak istiyorum.
Saat 10:00'sa Call 10:00 makrosu
Saat 11:00'se Call 11:00 makrosu gibi Haluk bey

 

[Haluk]

Şöyle deneyin ...

Application.Run Sheets("Hesaplama").Range("N2").Text

.

 

[Haluk]

Resmi yüklediğiniz site tuhaf bir yer .... indiremedim.

Google Drive gibi düzgün bir yere dosyanızı ekleyin, bir ara bakayım ....

.

 

[buyocan]

Tekrar yükledim.
https://drive.google.com/file/d/1Ath9kcHWrp4w-E2bYMqYFFlNofoxpVUZ/view?usp=sharing

 

[Haluk]

Arkadaşım, resmi değil dosyayı yükleyin .......

.

 

[buyocan]

İlginiz için teşekkürler Haluk bey. İşyeri normal dosya eklememi istemedi. Ama sorunum;
Aşağıda kullandığım kod dediğinizide ekledim olmadı. Call Saat yazınca Saat hata veriyor. Olan bir makro adı yazınca sorun yok.
Sorun Saat = Sheets("Hesaplama").Range("N2") değerini Saate atayarak Call Saat yazınca hata veriyor. Umarım yardım edebilirsiniz.

Sub Deneme()
Saat = Sheets("Hesaplama").Range("N2")
Call Application.Run Sheets("Hesaplama").Range("N2").Text
'Call Saat ' Burada Saati nasıl kabul ettirebilirim. Hata veriyor ?
End Sub

 

[Haluk]

İş yerinize kolay gelsin .....

Siz yine de; N2 hücresinde yazan veriyi ve kullandığınız makroların isimlerinden 1-2 tane örnek verin.

.

 

[Haluk]

Ya da aşağıdaki linkte yer alan dosyayı inceleyin .... Mantığını buna benzetin.

https://drive.google.com/open?id=1GS6r6uUPD5MLcWHtKl5QdxY5b0y5rbNO


.

 

[Ömer BARAN]

Merhaba.

Malesef; soru soran/sorunu/ihtiyacı olan üyelere;
gerçek belgelerindeki bilgilerinin, konuyu cevaplamayı düşünenlerin herhangi bir işine yaramadığını,
kimsenin bir başka kişi/firmanın bilgilerine ihtiyaç duymadığını anlatmakta güçlük çekiyoruz.

Üstelik, karşılıksız olarak sorun çözmeye hazır Sayın Haluk Bey gibi çok sayıda üye mevcut.

Soru soran/soracak olan üyenin örnek belge hazırlarken yapması gereken;
-- F12 tuşuna basıp gerçek belgenin bir kopyasını kaydetmek,
-- bu kopya belgedeki özel bilgileri temizlemek,
-- özel bilgiler sorunun cevabını etkileyecekse bunların yerine,
bu bilgileri temsil edebilecek özelliklere sahip (METİN/TARİH/SAYI gibi özellikler) anlamlı ve tutarlı olmak koşuluyla hayali veriler yazmak,
-- soruyu etkileyebilecek, kullanılan formüllerin/makroların belge içerisinde ve çalışır durumda olmasını sağlamak,
-- nihai olarak elde edilmesi istenilen sonuçları örneklendirerek metin kutularına veya uygun hücrelere kısa açıklamalar yazmaktan ibaret.

Soru sormak için bu zahmetlere girip girmeme kararı elbette, ihtiyacın karşılanmasından elde edilecek faydaya göre verilecektir.
.

 

[buyocan]

Haluk bey ilginize teşekkürler. Tam istediğim buydu. Eliniz dert görmesin.
Ömer bey bende isterdim ama maalesef ........ olmuyor. Sitedeki emeğinizden dolayı size de teşekkürler.