Koşulların bir kısmı karşılandığında metni değiştirin

Question

Bazı metinleri içeren bir hücreyi bulmak için bazı VBA çalıştıran bir excel sayfası var ve yerini yeni bir metin alıyor. Olmak istediğim şey, programda "In" kelimesini gördüğünde "Hücre" yerine "Zamanlanmış Çalışmak" ile değiştirir, ancak orijinal hücre değeri sadece "In" değil, aynı zamanda bir zaman içerir. bu dinamik. "If" ve farklı zamanlarda bulunan hücreleri değiştirmenin bir yolu var mı? Aşağıda yazılan kodum var, ancak bunu "In" içeren bir hücreye nasıl değiştireceğimi bilmiyorum.

Teşekkürler! İstediğim şeyin

Örnek:

Güncel hücre: "In - 12:30", "In - 11:45" vb Gelecek hücre:

ws.Columns("D:D").Select 
Selection.replace What:="In", Replacement:="Scheduled to work", LookAt:=xlPart _ 
    , SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ 
    ReplaceFormat:=Falseenter code here 

Answer 1

"çalışmak Planlanmış"

Sorduğun şey, 'Zamanlanmış Çalışma' dizesinin hem kelimesini hem de zamanını değiştirmek olduğunu düşünüyorum. Eğer durum buysa

, böylece gibi denizaltıya bir joker eklemeyi deneyin:

ws.Columns("D:D").Select 
Selection.replace What:="In*", Replacement:="Scheduled to work", LookAt:=xlPart _ 
    , SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ 
    ReplaceFormat:=False