Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
25.04.2024 12:55:42
Funktionsparameter auslesen
25.04.2024 11:49:37
Array verwenden
25.04.2024 10:38:52
Bedingte Formatierung per VBA / MaxPoint
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1004to1008
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1004to1008
1004to1008
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

suchen und eintragen

suchen und eintragen
05.09.2008 11:03:34
Christian
Hallo Leute,
ich hab da etwas ganz einfaches. Ich möchte, dass VBA in einen Bereich C17:C34 der Tabelle 1 den Eintrag der ComboBox1.Value sucht und dann zwei Spalten weiter rechts den Wert der TextBox 1 einträgt.
kann jemand helfen ?
Gru Christian
https://www.herber.de/bbs/user/55178.xls

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: suchen und eintragen
05.09.2008 11:27:00
Christian
Das habe ich bisher !

Private Sub CommandButton1_Click()
TextBox1.Value = Runde1
TextBox2.Value = Runde2
TextBox3.Value = Runde3
TextBox4.Value = Runde4
TextBox5.Value = Runde5
For Each FahrzeugZelle In [C17:C34]
If FahrzeugZelle = ComboBox1.Value = True Then Exit For
Next
FahrzeugZelle = ActiveCell
Spalte = FahrzeugZelle.Column
Zeile = FahrzeugZelle.Row
Cells(Zeile, Spalte + 2) = Runde1
End Sub


AW: suchen und eintragen
05.09.2008 11:33:00
Mac4
Hi Christian,
sowas in der Art sollte gehen:

Sub test()
Dim Treffer As Range, Trefferzeile As Long
Set Treffer = Sheets("Tabelle1").[C:C].Find(UserForm1.ComboBox1, LookIn:=xlValues)
Trefferzeile = Treffer.Row
Sheets("Tabelle1").Cells(Trefferzeile, "E") = UserForm1.TextBox1
End Sub


Marc

Anzeige
AW: suchen und eintragen
05.09.2008 11:38:00
Christian
Großartig Marc !!!
Die Helden von heute sind die Millionäre von morgen !!
Gruß Christian
AW: suchen und eintragen
05.09.2008 11:44:00
Mac4
Hi Christian,
ich fürchte, soweit wird es nicht kommen!
Danke für die Rückmeldung und ein schönes WE
Marc

299 Forumthreads zu ähnlichen Themen

Datei in allen Verzeichnisen und Odnern suchen
René

Hallo liebe Experten,
ich benötige ein Macro für eine Schaltfläche.
Es soll eine bestimmte Excel Datei in allen Verzeichnisen C:\ D:\ E:\ usw - und Ordnern des Rechners gesucht werden und diese dann per Klick geöffnet werden.
Kann mir bitte jemand helfen ?
Es grüßt Euch freund...
21.08.2008 21:14:00
Thread-ID: 1003638
6 Beiträge
Anzeige
Häufigkeit einer Uhrzeit aus einer Spalte
wolfgang

Hallo Leute
Ich habe eine Spalte mit einer menge Uhrzeiten und möchte die Häufigkeit einer Uhrzeit ( wie oft ist eine eintrag vorhanden)zum Beispiel zwischen 08:00 und 17:00!! Ich weiß das für euch sicher ein leichtes ist jemanden wie mir zu helfen!
Schon jetzt besten Dank für eure Mühe...
02.09.2008 15:11:51
Thread-ID: 1006816
2 Beiträge
von Datum bis Datum suchen und Werte in die Spalte
Datum

Hallo liebe Excel-Könner,
ich habe folgendes Problem und finde keine Lösung.
Ich habe in Spalte A von 2006 bis heute Datum stehen, über eine UserForm möche ich in zwei TextBoxen von bis Datum eintragen und in Spalte B in diesem Bereich den WertX.
Ich hoffe Ihr könnt mir helfen!
...
07.09.2008 09:31:20
Thread-ID: 1007931
8 Beiträge
Anzeige
Berechnen von Werten in einer Spalte
Werten

Folgendes Problem:
In der Spalte A möchte ich wissen, wieviel unterschiedliche Werte es gibt.
Wer kann mir helfen.
Danke
Alex
05.10.2008 12:52:00
Thread-ID: 1014231
5 Beiträge
Suchen und finden
oscar

Hallo zusammen, über folgenden VBA-Code suche ich in einer Spalte.
Sub CSVAuslesen() Dim i As Integer Dim s As Variant auswahl = InputBox("Auswahl Spalte 2 = GCode") s = auswahl If auswahl = "" Then Exit Sub For i = Cells(Rows.Count, 2).End(xlUp).Row To 1 Step -1 If Cells(i, 2).Value = s...
07.10.2008 09:46:29
Thread-ID: 1014618
3 Beiträge
Filtern, gefilterte Daten benutzen, Suchen und Aus
Merle


Hallo alle zusammen,
ich habe ein mittelschweres Problem. Und zwar habe ich hier ein Beispiel:
https://www.herber.de/bbs/user/55986.xls
In 'Tabelle1' sind ganz viele verschiedene Waren (C17:57) hinterlegt. Ich möchte nun, wenn ich eine dieser Waren rausfilter z.B H025, dass da...
13.10.2008 15:48:00
Thread-ID: 1016087
3 Beiträge
Gleiche Eintäge in einer Spalte nacheinander finde
Malcolm_p

Hallo zusammen!
Wenn ich einen bestimmten Eintrag - per VBA - in einer Spalte finden möchte verwende ich der Regel den folgenden Code:
Dim NameSP As Range
Set NameSP = Sheets("Konten").Rows(1).Find( _
What:=Textbox1, _
Lookat:=xlWhole, _
LookIn:=xlValues)
Dim Erfdat...
15.10.2008 23:08:59
Thread-ID: 1016705
5 Beiträge
Suchen und Ersetzen schnelleres Makro
Susi

Hallo liebe Excel-Freunde,
ich habe folgendes kleines Makro.
Sub Suchen_Ersetzen() out = "15200" 'zu ersetzender String in = "43900" 'einzufügender String For Each cell In Selection If cell.HasFormula = True Then cell.Formula = Application.WorksheetFunction.Substitute(cell.Formula, ou...
20.10.2008 12:19:00
Thread-ID: 1017624
17 Beiträge
Anzeige

Links zu Excel-Dialogen

TextBox UserForm

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
8
1
7
2
4
2
2
4
16
4
10
4
2
6
1
25
15
8
4
2
4
3
3
4