Array(spezielle Suche)

icemanlbkt · 31. Juli 2012, 07:59

Guten Morgen leute
Ich bin noch Neu in diesem Gebiet und ich wollte mal fragen ob jemand vielleicht weiß ob bzw wie es geht eine bestimmte suche zu machen.
Das heißt ich will ein Makro erstellen und in dem Makro will ich Spalte für Spalte durchsuchen um den Inhalt {} dieser Klammer zu finden und von jeder Zeile wenn ein Neuer Eintrag gefunden worden ist ein Array zu erstellen.

Ich hoffe ihr habt mich verstanden.
Danke für eure Mühe.

LG

Edit by Dodo:
Nächstes Mal Thema Melden und bitten zu verschieben, den Thread nochmals neu aufmachen ist irgendwie unsinnig oder?
-> Topic verschoben (Grundlagen => VBA)

picoflop · 31. Juli 2012, 08:03

icemanlbkt schrieb:

Ich hoffe ihr habt mich verstanden.

Nicht wirklich.

Ich verstehe "Makro" und "Zeile"/"Spalte". Sprechen wir von VBA/Excel? Dann bitte im VBA/VBS Bereich!

RodFromGermany · 31. Juli 2012, 08:08

Willkommen im Forum. :thumbup:

Worin suchst Du?
Was für ein Makro soll das werden (VBA)?
In VB ist es ein Leichtes, die gefundenen Items einer Liste hinzuzufügen.

icemanlbkt · 31. Juli 2012, 08:10

Bin ich hier nicht in diesem Visual Basic Bereich?
Ich komm mit dem System noch nicht zurecht tut mir leid falls ich mir geirrt haben sollte.

RodFromGermany · 31. Juli 2012, 08:11

Du bist hier im Grundlagenforum VB. Wo willst Du denn genau hin?

icemanlbkt · 31. Juli 2012, 08:12

Ja ich Programmiere C in Visual Basic im Zusammenhang mit Excel.

picoflop · 31. Juli 2012, 08:16

icemanlbkt schrieb:

Ja ich Programmiere C in Visual Basic im Zusammenhang mit Excel.

Es wird dunkler und dunkler ...

Es wird schwierig, "C in Visual Basic" zu programmieren. Außerdem was heißt "im Zusammenhang"? VB IN Excel? => VBA!

icemanlbkt · 31. Juli 2012, 08:17

picoflop schrieb:

icemanlbkt schrieb:

Ja ich Programmiere C in Visual Basic im Zusammenhang mit Excel.

Es wird dunkler und dunkler ...

Es wird schwierig, "C in Visual Basic" zu programmieren. Außerdem was heißt "im Zusammenhang"? VB IN Excel? => VBA!

Okay ja. Verstehe. Wie gesagt bin noch totaler Anfänger.

RodFromGermany · 31. Juli 2012, 08:43

Wenn Du Dich verdrückt auskehrst ( :thumbsup:

), stellen wir schon so viele "dumme" Fragen bis wir wissen, was Du eigentlich willst.
Also: Weiter so (hab leider von VBA keine Ahnung).

icemanlbkt · 31. Juli 2012, 08:48

RodFromGermany schrieb:

Wenn Du Dich verdrückt auskehrst ( ), stellen wir schon so viele "dumme" Fragen bis wir wissen, was Du eigentlich willst.
Also: Weiter so (hab leider von VBA keine Ahnung).

jaaa das ist mir klar... ich weiß hallt noch nicht sooo genau.

Aber kannst du mir vielleicht verraten was der Unterschied ist von VB und VBA?

Ist das eine einfach Visual basic und das andere nur für die Office Anwendung als Makro oder?

Byte · 31. Juli 2012, 08:52

Hi,

In VB.NET kannst du mit dem .NET Framework arbeiten und deren Funktionen, Klassen etc verwenden die dir das Programmieren sehr erleichtern. VBA ist für Makros gedacht wie z.B. für Excel, Access.

LG

icemanlbkt · 31. Juli 2012, 08:57

Hey.
Danke okay das ist verständlich.
Weißt du vielleicht eine Lösung für mein Problem?

LG

Byte · 31. Juli 2012, 08:59

Deine Beschreibung ist nicht vollständig, arbeitest du in Excel oder Access?

icemanlbkt · 31. Juli 2012, 09:00

in Excel

Byte · 31. Juli 2012, 09:07

Wie sieht deine Excel Sheet aus? Poste mal ein Screenshot oder so bitte.

icemanlbkt · 31. Juli 2012, 09:15

Darf ich nicht. Bin in einer großen Firma und darf das nicht raus geben.

Aber ich kann dir was ähnliches basteln.

Spalte A Spalte B
A1 {a}
A2 {a}
A3 {d}
A4 {d}

und davon muss ich jedesmal wenn ein neuer Eintrag in Spalte B in neues Array machen. aber nur wenn der Inhalt zwischen diesen Klammern {} ungleich dem anderen ist.

Hoffe das ist verständlich^^

FloFuchs · 31. Juli 2012, 10:20

Visual Basic-Quellcode

Option Explicit
Sub test()
Dim gefunden 'Dictionary erstellen
Set gefunden = CreateObject("scripting.dictionary")
Dim rng As Range
For Each rng In ActiveSheet.Range("A1:D1") 'Dein Suchbereich durchgehen
Dim str As String
str = rng.Value
If Left(str, 1) = "{" And Right(str, 1) = "}" Then 'überprüfen ob der Zellinhalt mit { anfängt un aufhört
gefunden.Add rng.Address, Mid(str, 2, Len(str) - 2) ' falls ja, den Inhalt unter der aktuellen Zelle ins Dictonary schreiben
End If
Next
''' Nur Code zur ausgabe des Dictonary...
Dim elements
elements = gefunden.items
Dim e
For Each e In elements
MsgBox e
Next
End Sub

meinste sowas in der Art?

icemanlbkt · 31. Juli 2012, 10:27

Also das ist jetzt das finden oder?
Ich habe noch eine Erweiterung.

[Excel] zweidimensionales Array vergleichen

Wäre cool wenn du mir das auch beantworten könntest

Byte · 31. Juli 2012, 10:29

Hi,

Ich würde dir nicht raten das ganze so anzugehen, wieso baust du das ganze nicht so auf:

Statt:
SpalteA
-----------------
A1 {v1, v2, v3, v4, v5}

So:
SpalteA SpalteB
---------- -----------
A1 wert1
A1 wert40
A2 wert60
A3 wert20

icemanlbkt · 31. Juli 2012, 10:31

Wie meinst du das?

Array(spezielle Suche)

Array(spezielle Suche)

icemanlbkt schrieb:

icemanlbkt schrieb:

picoflop schrieb:

icemanlbkt schrieb:

RodFromGermany schrieb:

Visual Basic-Quellcode

Ähnliche Themen

2 Benutzer haben hier geschrieben