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

• #7287 ALbeeeee csendes tag Delila_1 #7286

  Új Válasz 2010-05-21 15:46:47 #7287

  Ú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

  

  ALbeeeee

  csendes tag

  válasz Delila_1 #7286 üzenetére

  Szia,

  pont most sikerült így megoldanom:

  Private Sub Worksheet_Change(ByVal Target As Range)
  If Sheets("Munka1").Range("F11") = 1 Then
  Munka1.TextBox1.Visible = True
  Else
  Munka1.TextBox1.Visible = False
  End If

  If Sheets("Munka1").Range("F11") = 1 Then
  Munka1.DrawingObjects("Lekerekített téglalap 10").Visible = False
  Else
  Munka1.DrawingObjects("Lekerekített téglalap 10").Visible = True
  End If

  End Sub

  Amit írtál azt is próbáltam, de valamiért nem csinálta meg...de még próbálkozom azzal a verzióval is!

  Lenyíló: Fejlesztőeszközök > Beszúrás > Beviteli lista (űrlap vezérlőelem)

  Ismerem az adatérvényesítést is, csak ott az nem tetszik a listánál, hogy egyszer rá kell kattintani és csak utána látható a lista(fül).

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