Thema Datum  Von Nutzer Rating
Antwort
14.08.2017 13:37:42 guter_alter
NotSolved
14.08.2017 21:50:38 Crazy Tom
NotSolved
16.08.2017 08:56:46 Gast34875
NotSolved
16.08.2017 08:57:11 Gast87363
NotSolved
16.08.2017 11:24:12 Crazy Tom
NotSolved
16.08.2017 13:48:50 guter Alter
NotSolved
16.08.2017 14:38:39 Crazy Tom
NotSolved
16.08.2017 14:54:59 Gast18061
NotSolved
16.08.2017 14:56:44 Crazy Tom
NotSolved
16.08.2017 15:17:40 Gast5061
NotSolved
Rot Suchfunktion VBA (Wildcards)
16.08.2017 15:35:36 Crazy Tom
NotSolved
21.08.2017 12:44:23 Guter Alter
NotSolved
21.08.2017 17:43:24 Crazy Tom
NotSolved
22.08.2017 08:30:15 guter Alter
NotSolved

Ansicht des Beitrags:
Von:
Crazy Tom
Datum:
16.08.2017 15:35:36
Views:
598
Rating: Antwort:
  Ja
Thema:
Suchfunktion VBA (Wildcards)

Hallo

du hast eingangs geschrieben dass du die zu suchenden Texte in Spalte A (1) hast

und dazu hast du die Übersetzungen in Spalte E (5)

wenn die Spaltenanzahl der Listbox auf 2 steht und du die Breite (ColumnWidths) nicht auf 0 gesetzt hast

dann wird in der ersten Spalte der Listbox der Text aus Spalte A angezeigt

und in der zweiten Spalte werden die Einträge aus der gleichen Zeile aus Spalte E (5) gelistet

es wird also nach dem Text gesucht

die Fundzelle des Textes wird in der Variablen C gepeichert

nun wird der gefundene Text in Spalte 1 der Listbox gezeigt

und in der zweiten Spalte der Text, oder was auch immer, aus der gefunden Zeile (C.Row) Spalte E (5) angezeigt

die erste Zeile wie auch die erste Spalte einer Listbox hat den Index 0

wenn ich der Listbox mit AddItem einen Eintrag zuweise erfolgt das in der Regel immer in der ersten freien Zeile der Listbox

will ich jetzt in der gleichen Zeile der Listbox aber in der zweiten Spalte den Text dazu schreiben

muß ich erst die Zielzeile ermitteln

lngAnz ist in meinem Code die Anzahl der Listboxzeilen

lngAnz ermittel ich mit dieser Zeile: lngAnz = listbox1.Listcount

ist erst ein Eintrag in der Listbox hat lngAnz den Wert 1

nun wird der Eintrag aus Spalte 5 (E) dazu gepackt

der soll ja dann in der gleichen Zeile des gesuchten Strings stehen

lngAnz ist 1, die erste Zeile der Listbox hat aber den Listindex 0, daher lngAnz -1

 

MfG Tom

 


Ihre Antwort
  • 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: Name: Email:



  • 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
14.08.2017 13:37:42 guter_alter
NotSolved
14.08.2017 21:50:38 Crazy Tom
NotSolved
16.08.2017 08:56:46 Gast34875
NotSolved
16.08.2017 08:57:11 Gast87363
NotSolved
16.08.2017 11:24:12 Crazy Tom
NotSolved
16.08.2017 13:48:50 guter Alter
NotSolved
16.08.2017 14:38:39 Crazy Tom
NotSolved
16.08.2017 14:54:59 Gast18061
NotSolved
16.08.2017 14:56:44 Crazy Tom
NotSolved
16.08.2017 15:17:40 Gast5061
NotSolved
Rot Suchfunktion VBA (Wildcards)
16.08.2017 15:35:36 Crazy Tom
NotSolved
21.08.2017 12:44:23 Guter Alter
NotSolved
21.08.2017 17:43:24 Crazy Tom
NotSolved
22.08.2017 08:30:15 guter Alter
NotSolved