|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
20.12.2022 15:41:15 |
Gast38800 |
|
|
|
20.12.2022 16:13:40 |
Stefan Onken |
|
|
|
21.12.2022 10:24:19 |
Marius |
|
|
|
21.12.2022 23:16:32 |
ralf_b |
|
|
|
22.12.2022 11:00:08 |
Marius |
|
|
 Tabellenformat in aktive Zeile übernehmen |
22.12.2022 12:25:44 |
Marius |
|
|
|
22.12.2022 14:02:24 |
Gast51643 |
|
|
|
22.12.2022 20:31:22 |
ralf_b |
|
|
|
02.01.2023 15:01:41 |
Marius |
|
|
Von:
Marius |
Datum:
22.12.2022 12:25:44 |
Views:
655 |
Rating:
|
Antwort:
|
Thema:
Tabellenformat in aktive Zeile übernehmen |
|
Hallo Zusammen,
ich habe folgenden Ansatz zum erfassen von Daten in eine Tabelle ohne TAG gefunden:
Private Sub cmd_OK_Click()
With Worksheets("Tabelle1").Range("A65536").End(xlUp)
.Offset(1, 0) = UserForm1.cbo_Datum
.Offset(1, 1) = UserForm1.txt_Artikelnr
.Offset(1, 2) = UserForm1.txt_Artikelbezeichnung
.Offset(1, 3) = CLng(UserForm1.txt_Anzahl)
If opt_Buy = True Then .Offset(1, 4) = "B"
If opt_Sell = True Then .Offset(1, 4) = "S"
End With
UserForm1.txt_Anzahl = ""
cmd_OK.Enabled = False
txt_Artikelnr.SetFocus
txt_Artikelbezeichnung.SetFocus
txt_Anzahl.SetFocus
End Sub
Ich habe dies ausgetestet und es funktioniert einwandfrei. Dadurch dass ich jetzt die Möglichkeit habe der Textbox zu sagen ob ihr Inhalt ein Text oder eine Zahl ist, wird auch die Formartierung der Tabelle übernommen.
Meine Frage jetzt ist:
Kann man o.g. Code so umschreiben, dass ich eine Auftragsnummer in die UF laden kann und diese nach Bearbeitung wieder in die Tabelle schreibe?
Also wie bei dem bisherigem Ansatz in der Arbeitsmappe nur halt ohne TAG-Methode.
Vielen Dank.
Gruß
Marius
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
20.12.2022 15:41:15 |
Gast38800 |
|
|
|
20.12.2022 16:13:40 |
Stefan Onken |
|
|
|
21.12.2022 10:24:19 |
Marius |
|
|
|
21.12.2022 23:16:32 |
ralf_b |
|
|
|
22.12.2022 11:00:08 |
Marius |
|
|
Tabellenformat in aktive Zeile übernehmen |
22.12.2022 12:25:44 |
Marius |
|
|
|
22.12.2022 14:02:24 |
Gast51643 |
|
|
|
22.12.2022 20:31:22 |
ralf_b |
|
|
|
02.01.2023 15:01:41 |
Marius |
|
|