Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1944to1948
1944to1948
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wert aus Textbox in mehrere Zellen eintragen.

Forumthread: Wert aus Textbox in mehrere Zellen eintragen.

Wert aus Textbox in mehrere Zellen eintragen.
04.09.2023 10:22:02
BoutyX
Moin,
vielleicht kann mir einer helfen. Ich würde gerne in die Textbox ( Karton Nr.:) z.B 1-10 oder einfach 10 Eintragen dann die Restlichen Textboxen füllen und am ende soll es Anhang der eingetragener Nummer in ( Karton Nr.:) dementsprechend die Zellen füllen. (sieh Bild 3)

Würde mich gerne über eine Lösung freuen.



Userbild

Userbild


Bild 3.
Userbild
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert aus Textbox in mehrere Zellen eintragen.
04.09.2023 13:03:01
snb
Ich mag solche Bilder.....
AW: Wert aus Textbox in mehrere Zellen eintragen.
04.09.2023 19:45:07
Piet
Hallo

wenn ich die Aufgabe richtig verstanden habe müsste das hier die richtige Lösung sein.
Bei der LastZell suche setzt man voraus, das die Karton Nummer immer fortlaufend weitergeht.
Bei dieser Lösung ist die richtige Zeile die Karton Nummer +1 für die Überschriftszeile.

mfg Piet 

'Eintrag in Tabelle bei TextBox Menge

Private Sub CommandButton1_Click()

    If IsNumeric(TextBox1) Then

       x = TextBox1.Value + 1   'Karton Index ermitteln

       Tabelle1.Cells(x, 1).Value = UserForm1.Parcel.Value

       Tabelle1.Cells(x, 2).Value = UserForm1.Product.Value

       Tabelle1.Cells(x, 7).Value = UserForm1.Contents.Value

    End If

End Sub
Anzeige
AW: Wert aus Textbox in mehrere Zellen eintragen.
06.09.2023 20:36:27
Piet
Hallo

mit diesem Code sollten beide Forderungen erfüllt sein. Freut mich wenn es damit klappt.

mfg Piet 

Private Sub CommandButton1_Click()

Dim a As Integer, e As Integer, x As Integer

    If IsNumeric(Parcel) Then

       x = Parcel.Value + 1   'Karton Index ermitteln

       Tabelle1.Cells(x, 1).Value = UserForm1.Parcel.Value

       Tabelle1.Cells(x, 2).Value = UserForm1.Product.Value

       Tabelle1.Cells(x, 7).Value = UserForm1.Contents.Value

    ElseIf InStr(Parcel, "-") And IsNumeric(Left(Parcel, 1)) Then

       'mehrfach ausfüllen in Felder 1-10

       a = Left(Parcel, InStr(Parcel, "-") - 1) 'Anfangszahl

       e = Mid(Parcel, InStr(Parcel, "-") + 1)  'Endzahl

       For x = a + 1 To e + 1 'Schleife zum ausfüllen

          Tabelle1.Cells(x, 1).Value = x - 1     'Karton- Nr.

          Tabelle1.Cells(x, 2).Value = UserForm1.Product.Value

          Tabelle1.Cells(x, 7).Value = UserForm1.Contents.Value

       Next x

    End If

End Sub
Anzeige
AW: Wert aus Textbox in mehrere Zellen eintragen.
05.09.2023 09:57:00
BoutyX
Hallo Piet,

vielen Dank für den Ansatz. Aktuell schreibt er mir die Werte in die jeweilige Zelle die in der TextBox1 steht. Ich würde es aber gerne so haben, dass, wenn in der TextBox1 (1-10) oder (10) steht dann auch in Zelle 1-10 gleicher Eintrag gemacht wird.
AW: Wert aus Textbox in mehrere Zellen eintragen.
04.09.2023 13:39:46
GerdL
Moin,

ein Ansatz ohne deine Datei nach Schema für das Userformmodul. 

Private Sub CommandButton1_Click()



    If IsNumeric(TextBox1) Then

        Tabelle1.Cells(Rows.Count, 1).End(xlUp).Offset(1) = TextBox1

    End If



End Sub

Gruß Gerd

Anzeige

Forumthreads zu verwandten Themen

Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:33:59
Thread-ID: 1000866
3 Beiträge
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:34:08
Thread-ID: 1000867
5 Beiträge
Textteile in Zellen mit Liste vergleichen
susidimarca

Hallo,
ich habe derzeit ein kniffeliges Excelproblem.
ich möchte gerne den Text in Zellen
hjgshgjdf Kriterium2 kjhfkjhfksdjhf
dskj Kriterium1 ajdhasjdhakjdhakdhajkdhajkdakj
daudzauizdaiudzaidzaisdz Kriterium3 kajhdasks
mit den Kriterium eine anderen Tabelle vergleichen...
21.08.2008 10:05:00
Thread-ID: 1003378
6 Beiträge
Zelleninhalt (Text) in 2 Spalten teilen
El.

Hallo!
Habe eine Spalte in der Artikelname und Artikelmerkmale, durch drei Punkte getrennt "...", zusammen stehen. Beispiel: Lecker Whisky 21 Jahre ... Lieferung in hochwertiger Schatulle
Wie krieg ich nun den Text links der Punkte in eine extra Spalte und rechts der Punkte in eine extr...
03.09.2008 16:35:00
Thread-ID: 1007155
4 Beiträge
Textinhalte aus Zellen zusammenkopieren
zehetner

Liebe Profis,
ich habe die Ergebnisse einer Befragung in ein Excel-Sheet eingegeben, jeder Befragte in ein Registerblatt. Nun möchte ich die Antworten der Befragten, die in Textfeldern (immer in den selben, zB E145 stehen) gesammelt in eine neue Tabelle bringen.
Ziel ist es, die Antwort...
21.09.2008 18:29:25
Thread-ID: 1011343
2 Beiträge
Anzeige
Zelleninhalt auf Textteil überprüfen...
Jessi

Hallo zusammen,
ich bin gerade dabei meine Liste mit SVerweisen zu füllen und hänge an einem Problem:
Eine Ausgabe (über SVerweis) liefert einen Wert "String" XY_Text, ALTERN_Text oder MUSTER_Text in einer Zelle
jetzt möchte ich in einer anderen Zelle sagen:
Wenn Zelleninhalt mi...
07.11.2008 12:55:13
Thread-ID: 1022638
2 Beiträge
Anzeige
Textbox Werte in Zellen schreiben
pritt

Hallo zusammen, ich komme nicht so richtig klar: Ich habe eine Userform mit 4 Textboxen, die zu Laufzeit vom User mit Werten gefüllt werden. Wenn alle 4 Textboxen gefüllt sind, sollen diese Werte in 4 verschiedene Zellen eines Tabellenblatts geschrieben werden. Folgenden Code habe ich bisher er...
13.11.2008 12:59:19
Thread-ID: 1024171
7 Beiträge
Zelleninhalt mit CommandButton in Textbox anzeigen
Markus

Hallo an alle!
Mein Makro kann bisher folgendes:
Per Klick auf 1 von 300 Comandbuttons wird der entsprechende Inhalt aus einer von 300 Zellen in eine Textbox geladen.
"Das funktioniert"
Nun möchte ich , nachdem ich einen Button gedrückt habe und der Inhalt in Textbox angezeigt w...
21.11.2008 11:05:00
Thread-ID: 1026664
2 Beiträge
Textdatei einlesen und Dateinamen in Zellen
Pascal

Hallo zusammen,
ich hätte mal eine Frage an euch.
Ich bekomme monatlich ca 20 Textfiles zu einem Thema per Mail geschickt und möchte alle in einer Excel Datei zusammenfassen (DIe Inhalte der Textfiles in einem Excelsheet untereinander schreiben lassen)
Allerdings gibt es eine Besond...
08.10.2009 10:04:40
Thread-ID: 1108100
4 Beiträge
Drei Spalten vergleichen und auch Zellen mit Text
belanglos

Hallo,
mir hat im Beitrag: https://www.herber.de/forum/archiv/1112to1116/t1112845.htm#1112845 "WF" mit der Formel: "=WENN(ANZAHL(A1:C1)=0;"";WENN(ANZAHL(A1:C1)=1;MAX(A1:C1);WENN(UND(A1=B1;A1=C1);A1;"x")))" weitergeholfen.
Da ich dort irgednwie nichts schreiben kann, habe ich mal einen n...
10.11.2009 12:01:55
Thread-ID: 1115729
5 Beiträge
Drei Spalten vergleichen und auch Zellen mit Text
belanglos

Hallo,
mir hat im Beitrag: https://www.herber.de/forum/archiv/1112to1116/t1112845.htm#1112845 "WF" mit der Formel: "=WENN(ANZAHL(A1:C1)=0;"";WENN(ANZAHL(A1:C1)=1;MAX(A1:C1);WENN(UND(A1=B1;A1=C1);A1;"x")))" weitergeholfen.
Da ich dort irgednwie nichts schreiben kann, habe ich mal einen n...
10.11.2009 10:40:06
Thread-ID: 1115733
2 Beiträge
Anzeige
Text in Spalten fuer jeweils 3 Zellen
Bec

Hallo alle,
ich suche gerade kurse fuer unis in singapur zusammen und habe eine hilfreiche liste, welche als word doc gespeichert wurde, mir so allerdings nicht hilft weil zu unuebersichtlich.
Das Doc ist hier zu finden: http://www.moe.gov.sg/education/private-education/files/edp-list...
14.01.2010 19:13:15
Thread-ID: 1130029
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige