vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Erstellen von dynamischen Kontextmen?s - wann immer Sie sie brauchen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Loop bis Zelle gewissen wert hat 
Autor: PinkoPalino
Datum: 13.07.06 13:06

Mein Problem ist folgendes:
In einer Excel Tabelle habe ich in der ersten Spalte jeweils in einer Zeile ein Wort stehen.
Nun sollte das Makro jene Zelle in der ersten Spalte bestimmen, in der der Wert "empfohlen" steht. Am Ende sollte man dann Wissen, in welcher Zelle das Wort steht, damit man nachher neben der Zelle, wo "empfohlen" steht diesen Wert für die Zelle C1 übernehmen kann.
Etwas kompliziert geschrieben aber Hier ein Bsp. :
Der Wert "empfolen" wurde in der Zelle A10 gefunden. Nun sollte man den Wert aus der Zelle B10 auf C1 übernehmen.

Ich hab mir das wie folgt vorgestellt. Nur funktioniert das nicht:

sub Format
 Dim x as Integer
 x=0 
 Loop
   Do x = x+1 until Cells(A,x) = "empfolen"
 Range(C1) = Cells(B,x)
end sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Loop bis Zelle gewissen wert hat763PinkoPalino13.07.06 13:06
Re: Loop bis Zelle gewissen wert hat501mitsch13.07.06 13:49
Re: Loop bis Zelle gewissen wert hat471mitsch13.07.06 13:50
Re: Loop bis Zelle gewissen wert hat477mitsch13.07.06 14:29
Re: Loop bis Zelle gewissen wert hat490PinkoPalino13.07.06 14:26
Re: Loop bis Zelle gewissen wert hat458Prian081513.07.06 14:53

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel