Hallo!
Kann mir einer einen Rat geben wir ich ein kleines tool programmieren kann, womit ich in eine vorhandene Excel Tabelle werte eintragen kann.
Es soll nur in Spalte A2-Ax geschrieben werden. Im grunde nur eine kleine Auflistung…
Wäre nett wenn mir jemand helfen könnte.
Faisal
kleiner rat
hallo,
du nimmst visual basic, setzt einen verweis auf excel, instanzierst dir ein excel-object und lädst deine vorhandene arbeitsmappe. auf dem jeweiligen sheet unter gewünschter spalte/zelle schreibst du deinen wert.
fertig
gruß
rasta
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Hi. brauchst du denn wirklich ein tool dafür? Reicht dir nicht die Maske von Excel??
Markiere die Spalte „A1“ bis „Ax“ und geh auf Menü „Daten“ und „Maske“
Dann trägt er dir Zelle für Zelle deine Daten ein!
Hoffe ich konnte dir helfen!
Daniel
Hi Daniel!
Das war auch mein vorschlag! Aber mein Chef hätte lieber ein kleines, optisch ansprechendes, Tool von mir…
Aber im Grunde genaommen ist das die selbe funktion.
Hat jemand ein tipp, link etc…
Danke Faisal
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Na gut. Dann nutze VBA (ALT & F11) und erstell dir eine Userform. Die kannst du nach deinen Wünschen anpassen. Lege eine Textbox (Textbox1) und ein CommandButton1 drauf.
Doppelklicke im Entwurfsmodus auf den Commandbutton und füge folgenden Code ein:
Private Sub CommandButton1_Click()
If TextBox1.Text „“ Then
ActiveSheet.UsedRange. _
Cells(ActiveSheet.UsedRange.Cells.Count + 1).Select
ActiveCell.Value = TextBox1.Text
Else
MsgBox „Bitte einen Wert angeben!“
End If
End Sub
und bei „Diese Arbeitsmappe“ folgendes:
Private Sub Workbook_Open()
UserForm1.Show
End Sub
jetzt öffnet er jedesmal die Userform.
Bei einer Eingabe im Textfeld sollte er sich die letzte Zeile suchen und den Wert reinschreiben!
Gruß Daniel