Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1808to1812
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
Inhaltsverzeichnis

Text in Spalte a:a finden, zelle 1 Zeile

Text in Spalte a:a finden, zelle 1 Zeile
09.02.2021 08:24:15
Peter
Stahlliste
Projektdaten
Überseequartier Hamburg
Bezeichnung:
Bauherr:
URW
Bewehrungsplan: Stützen im 2. Untergeschoss Achse J-O/7-10
Planinhalt: Plan Nr: Datum:
USQ-XGSU-TBB-51-TQM-BW-U2H0-SU06-2S19-02-2F
2020-12-01
Tabellarisches verzeichins des Bewehrungstahls ( B500B )
Durchmesser [mm] [kg / m] Länge nach Ø [m] Gewicht nach Ø [kg]
einfach Bewehrungsstab
28 4,830 435,55 2103,71 Gesamtgewicht [kg] 2103,71
gebogen Bewehrungsstab
10 0,617 981,42 605,54 28 4,830 369,40 1784,20
Gesamtgewicht [kg] 2389,74
Gesamtmasse ( B500B ) 4493,44
Anzahl der Bewehrungsstabpositionen 20
Export einer pdf-Datei nach Excel.
Ich möchte in Spalte A:A nach dem Text "einfach" suchen und die Zelle darunter Aktivieren.
leider habe ich nicht das passende Skript gefunden. Ich hoffe mir kann jemand helfen.
Excel Version 2016.
Gruß Peter Urban

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Text in Spalte a:a finden, zelle 1 Zeile
09.02.2021 09:15:13
PeTeR
Hallo Peter,
funktioniert bei mir so:
Sub such()
Dim Zeile As Long
Zeile = Columns("A").Find(what:="einfach").Row
Cells(Zeile + 1, 1).Select
End Sub

Viel Erfolg
PeTeR
AW: Text in Spalte a:a finden, zelle 1 Zeile
09.02.2021 16:11:14
Peter
Moin PeTeR,
hat auch bei mir geklappt, auch mit dem übrigen Makro.
Danke
Gruß
Peter
=INDEX(A:A;VERGLEICH("*einfach*";A:A;0)+1)
09.02.2021 09:25:57
WF
.
AW: =INDEX(A:A;VERGLEICH("*einfach*";A:A;0)+1)
09.02.2021 14:48:08
Peter
Moin, danke für die Antwort, hilft mir jedoch nicht weiter da ich es innerhalb eines Makros benötige
Beispiel:
in meinem vorhanden VBA Makro möchte ich folgende Suche einbauen:
Suche in Spalte A nach "einfach" und gehe eine Zeile tiefer
dann folgt :
Selection.TextToColumns Destination:=Range("A14"), DataType:=xlFixedWidth, _
FieldInfo:=Array(Array(0, 1), Array(15, 1), Array(44, 1), Array(74, 1), Array(95, 1), _
Array(109, 1), Array(156, 1)), TrailingMinusNumbers:=True
im Anschluss suche "gebogen" und gehe eine zeile tiefer
um den befehl DataType:=.... erneut aus zu führen.
Anzeige
AW: Geht jetzt hier weiter...
09.02.2021 14:57:11
Peter
Moin und Danke für die Antwort,
leider habe ich mich missverständlich ausgedrückt.
ich benötige die suche innerhalb eines makros denn es folgen noch einige andere aufgaben die ich größtenteils schon gemeistert habe.
gruß peter

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige