Új hozzászólás Aktív témák

• #3186 F1DO senior tag Delila_1 #3185

  Új Válasz 2024-01-23 16:39:37 #3186

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  F1DO

  senior tag

  válasz Delila_1 #3185 üzenetére

  Beletettem ezt, de nem jelenik meg semmi, csak a várakozási idő

  Set InfoShape = ws.Shapes.AddTextbox(Orientation:=1, Left:=100, Top:=100, Width:=200, Height:=50)
  InfoShape.TextFrame.Characters.Text = "A keresett érték (" & SearchValue & ") megtalálva."
  
  ' Várakozás 2 másodpercig
  Application.Wait (Now + TimeValue("0:00:02"))
  
  ' Alakzat törlése
  InfoShape.Delete

Új hozzászólás Aktív témák