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

• #20176 the radish senior tag

  Új Válasz 2014-01-20 18:54:05 #20176

  Ú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

  

  the radish

  senior tag

  Sziasztok!
  Lenne az alábbi üzenet:
  Dim Answer As String
  Dim MyNote As String
  
  'Place your text here
  MyNote = "Helyezz a nyomtatóba "X" papírt!"
  
  'Display MessageBox
  Answer = MsgBox(MyNote, vbQuestion + vbYesNo, "Lapok nyomtatása")
  
  If Answer = vbNo Then
  MsgBox "Akkor majd később.", vbInformation, "Ejnye-bejnye..."
  'Code for No button Press
  Else
  'Code for Yes button Press

  Szóval az "X" papír kéne, hogy egy számra mutasson, az legyen mondjuk a munka1 A1 celllában.

  Köszi előre is.

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