Çözüldü Birden fazla hücrede değişiklik olunca çalışan makro

kalibre101 · 25 Ara 2023

merhabalar aşagıdaki gibi kodum var M5 hücresi değişince makro çalışıyor bura kadar sıkıntı yok , ben M5 hücresine ek olarak M13 hücresi değişincede aynı makro çalışsın istiyorum yani m5 veya m13 de değişiklik olunca çalışsın istiyorum düzeltme yapablirseniz memnun olurum.

Kod:

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

kalibre101 · 25 Ara 2023

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Union([M5], [M13])) Is Nothing Then Exit Sub
On Error Resume Next
ActiveSheet.DrawingObjects.Delete
Dim resimyolu As String
Dim resim As Picture
resimyolu = ActiveWorkbook.Path & "\" & Sheets(2).[M5] & ".jpg"
Set resim = ActiveSheet.Pictures.Insert(resimyolu)
With Range("V2")
resim.Top = .Top
resim.Left = .Left
resim.Height = .Height
resim.Width = .Width
End With
[K19] = "Yukarıda beyan ettiğim tarihler arasında" & " " & [M13] & " " & "Gün kullanmak istiyorum." & Chr(10) & "Arz Ederim" & " " & Date
End Sub

bu kodla sorunum çözüldü

muygun · 26 Ara 2023

Merhaba;

C++:

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Şeklinde deneyin.
iyi çalışmalar.

Foruma hoş geldin 👋 Ziyaretçi

Çözüldü Birden fazla hücrede değişiklik olunca çalışan makro

kalibre101

kalibre101

muygun