makro ile otomatik şekil çizdirmek

[udentr2002]

merhaba arkadaşlar ihtiyacım olan ekli dosyadada anlatmaya çalıştım, sürekli kullandığım küçük bira Akım şemam var bunu makro ile çalıştırıyorum. Yalnız kullandığım makroyu çalıştırabilmek için daha önceden çizilmiş bir akım şemasını kopyalatıp yapıştırıyorum makro böyle çalışıyor yani gerçi ekli dosyayı incelerseniz belki ne demek istediğimi daha iyi anlayabilrsiniz. Amacım o daha önceden çizilmiş şekil olmadan sadece makro tuşuna basstığımda istediğim şekli istediğim yere çizdirebilirmiyim yardımcı olursanız sevinirim. (Not: hangi hücre seçli ise makro orada çalışmalı)

 

[udentr2002]

ArkadaŞlar Bİlen Yokmu Ya LÜtfen Bakarsaniz Sevİnİrİm

 

[udentr2002]

kimse yokmuu

sayın hocalarım nerdesiniz "leventm" yada seyit hocam yokmusunuz ya lütfen bi baksanız şu dosyaya

 

[Seyit Tiken]

Ekli dosyadakiToggleButton'a bir kaç defa basıp deneyiniz.

 

[udentr2002]

seyit hocam ben anlatamadım sanırım

1. si dikkat edersen onlar resim falan değil hücre birleştirilmeyle oluştuırulmuştur banada öyle lazım yani hücre birleştirilmiş şekli ile
2.si ise onu defalarca ben yaptığım oluyor bir akım şeması oluşturuyorum belki ondan 30-40 tane yaptığım oluyor yani gizlenmesi değil lazım olan

kısacası bir makro yardımı ile yine birleştirilmiş hücre ve hemen o şekildeki gibi ok çizen bir makro yapılabilrmi yardımcı olabilrmisin vede öellikle makro seçili hücrede çalışmalı sana dosyayı tyekrar gönderiyorum inşallah anlatabilmişimdir

 

[Levent Menteşoğlu]

Aşağıdaki kodu deneyin.

Sub akım1()
[h2:o7].Copy ActiveCell
End Sub

 

[udentr2002]

levent hocam

o dediğnizi daha farklı bir kodlarla yaptım zaten ama dedim ya benim istediğim o şekli bir kod yardımı ile nasıl çizdirbilrim (bu arada onlar şekil değil hücre birleştirmesi belirtmek istedim.) lütfen yardımcı olursanız
çok sevinirim ekli dosyayı incelerseniz başka bir şekidle sordum lütfen yardımlarınızı bekliyorum Şimdiden teşekkürler