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

• #49843 istvankeresz aktív tag Delila_1 #49842

  Új Válasz 2022-11-04 09:58:20 #49843

  Ú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

  

  istvankeresz

  aktív tag

  válasz Delila_1 #49842 üzenetére

  Most még jó így. Viszont megint elakadtam. A Combobox-ok és textbox-ok értékeit akarom gombnyomással (Távollét rögzítése) az aktív munkalapra sorba egymásután átvinni úgy, hogy minden gombnyomásnál új sort kezdjen. Sajnos csak egy értéket tudok átvinni.

  Private Sub CommandButton1_Click()
  Dim c As Range
  For Each c In Range("A1:A999")
  If c.Value = "" Then c.Value = TextBox1.Value: Exit Sub
  Next
  End Sub

  Hogyan lehet többet?

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