VBA-Excel, wie schreibe ich in die Tabelle?

Computer: Software & Programmierung Office Software
1

Hallöchen,
ich absolviere gerade meine ersten Schritte mit VBA für Excel.

In meiner Arbeitsmappe wird durch Doppelklick auf ein Feld eine Form geöffnet, in die der Benutzer Zahlen eingeben kann.
Nun möchte ich die Zahlen in die Tabelle zurückschreiben und weiß nicht wie ich das machen soll.

Hier prüfe ich, welche Spalte angeklickt wurde und wenn es die siebte ist, geht die Form dlg_Dialog auf:
Public zeile As Variant
Public spalte As Variant

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)

spalte = ActiveCell.Column
zeile = ActiveCell.Row

If spalte = 7 Then
dlg_Dialog.Show
End If
End Sub

Der Dialog (ist ein Formular) sieht folgendermaßen aus:

Public result As Boolean

Private Sub bt_abbrechen_Click()
result = False
Hide
End Sub

Private Sub bt_ok_Click()
result = True
Hide
End Sub

wie bekomme ich das hin, daß die Eingabe in der Zelle (zeile, Spalte +4) ausgegeben wird?

Sina

2

Hi Sina,

wie bekomme ich das hin, daß die Eingabe in der Zelle (zeile,
Spalte +4) ausgegeben wird?

Cells(, ) =

also: Cells(ActiveCell.Row, ActiveCell.Column + 4) = …

die Punkte musst Du selbst ergänzen :wink: Was soll den aus der Form übernommen werden? Wenn es der Text aus einem Textfeld ist, gilt etwa … = Text1.Text

Gruß
Sculpture

3

Funktioniert!! Aber leider nur einmal
Hallo,
es funktioniert!!
Aber leider nur einmal.
Wenn ich in der nächsten Spalte doppelklicke wird das Ergebnis ignoriert.
Muß ich irgendwas zurücksetzen oder löschen oder was???

Sina