Thema Datum  Von Nutzer Rating
Antwort
Rot wenn in spalte was bestimmte steht überspringen
19.12.2008 11:43:03 Katrin
NotSolved
22.12.2008 13:49:53 Holger
NotSolved

Ansicht des Beitrags:
Von:
Katrin		 Datum:
19.12.2008 11:43:03		 Views:
1819		 Rating:
     
Antwort:
  Ja
Thema:
wenn in spalte was bestimmte steht überspringen
Hallo Zusammen,

heut steh ich irgendwie auf dme Schlauch. Ich möchte Daten aus einem anderen Sheet übertragen. Steht allerdings in Zeile A z.B. "Späh Karl", dann soll in der nächsten Zeile (bei mir I) weitergemacht werden und in der Zeile mit "Späh Karl" gar nichts passieren. Dachte das geht mit next I, aber dem ist nicht so. auch I+1 oder ähnliches geht nicht. Kann mir da irgendwer ein Tipp geben?

Vielen, vielen Dank und allen schon Mal schöne Feiertage!

Katrin


Hier ist übrigens der Code:


Sub Werte_einlesen()

Dim Pfad As String
Dim IniName As String


For I = 6 To ActiveSheet.Range("Legende").End(xlUp).Row 'Zeilen zählen 6 bis letzte



Lieferant = ActiveSheet.Cells(I, 1) 'Liest Lieferantennamen aus Spalte A
EKG = ActiveSheet.Cells(I, 2)
Jahr = ActiveSheet.Range("Jahr")

'Jan
Pfad = "='P:\Gru_EK_Lieferanten\12_Lagerlisten\EKG_" & EKG & "\" & Jahr & "\" & Lieferant & " Lagerliste " & Jahr & ".xls'!Erfüllungsgrad_Jan"
ActiveSheet.Cells(I, 3) = Pfad

.....

'Dez
Pfad = "='P:\Gru_EK_Lieferanten\12_Lagerlisten\EKG_" & EKG & "\" & Jahr & "\" & Lieferant & " Lagerliste " & Jahr & ".xls'!Erfüllungsgrad_Dez"
ActiveSheet.Cells(I, 14) = Pfad


If ActiveSheet.Cells(I, 1) = "Späh Karl" Then



Next I
End Sub

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
Rot wenn in spalte was bestimmte steht überspringen
19.12.2008 11:43:03 Katrin
NotSolved
22.12.2008 13:49:53 Holger
NotSolved