Danke
Schokoladenlilly
Verfasst am: 28. Sep 2011, 12:55 Rufname:
Tach,
ich hoffe ihr knnt mir irgendwie helfen..
ich habe ein Makro via Aufzeichnung erstellt und dann
alles Unntige (soweit ich das Unntige erkennen kann)
rausgeschmissen. Nun htte ich auch gerne das Excel die Zelle nimmt die ich vor der Ausfhrung
des Makros benutzt habe mit diesem Code hier nimmt er aber ( scheinbar)
immer die letzte aktive Zelle des Makros (den letzten RANGE-Befehl? )..
handelt sich um Excel 2010 da meckert Excel ber
nimmt nur Range....
Ist das berhaupt mglich bei so einer Art von Makro zur vorher benutzten Zelle zu springen? Den Range- Befehl mit der Matrix ist leider unbedingt notwendig
sonst haut er mir den Autofilter kaputt.... Excel 2007 - Aktive Zeile ermitteln - MS-Office-Forum. (oder setzt ihm mir so wie ich ihn nicht haben mchte)
Sub AnsichtTTL()
'
' AnsichtTTL Makro
Columns("A:RN")
= False
Rows("1:1103")
toFilter
Columns("D:E")
= True
allScroll ToRight:=253
Columns("JE:KC")
rgeScroll ToRight:=20
Columns("RE:RE")
Range("B2:RG1014")
Range("B7").
Excel Vba Aktuelle Zeile Auslesen Video
WriteLine("Richtige Tabelle");
for (int zeile = 3; zeile <= 3; zeile++)
Console. WriteLine("Zeile " + zeile);
lfs = (()[zeile, 1]);
artikel = (()[zeile, 4]);
charge = (()[zeile, 6]);
versandmeng = (()[zeile, 7]); // ## Zelle kann nicht gelesen werden
sdgnr = (()[zeile, 8]);
versandart = (()[zeile, 9]);
name1 = (()[zeile, 10]);
strasse = (()[zeile, 11]);
plz = (()[zeile, 12]);
ort = (()[zeile, 13]);
Console. WriteLine(lfs + " " + artikel + " " + charge + " " + versandmeng + " " + sdgnr + " " + versandart + " " + name1 + " " + strasse + " " + plz + " " + ort);}
catch
("Fehler beim lesen der Excelfile");}}}
else
Console. Excel Aktive Zelle auslesen VBA? (Computer, Programmieren, Office). WriteLine("Falsche Tabelle");}}
catch (Exception ex)
string error = ssage;}}}
("Error: Could not read file from disk. Original error: " + ssage);}}}
Hier findet Ihr die Excel Datei:
Download der Exceldatei
Auch würde ich gerne wissen wie ich damit umgehen muss wenn einer der Zeilen wirklich mal leer ist. Weil z. b. kein Firmennamen oder Artikelnummer angegeben wird. Ich danke Euch für eure hilfe.
Excel Vba Aktuelle Zeile Auslesen 2020
Geschrieben am: 07. 2014 13:48:54
Vielen lieben Dank für die Klarstellung! Wieder was gelernt! Betrifft:... owT
Geschrieben am: 07.
Excel Vba Aktuelle Zeile Auslesen Online
Ein typisches Beispiel ist eine Spalte mit Datumswerten, in die Anwender reinschreiben: "sofort", "35. KW" und nach der ausgewertet werden soll. So etwas lässt sich rechentechnisch nicht vernünftig verarbeiten. Ein weiteres Problem in Deinem Code ist die Ignoranz des Inhaltes des Exception-Objektes, welches im Catch-Bock bereitgestellt wird. Die Auswertung würde Dir sofort die Ursache Deines Problems zeigen. Excel vba aktuelle zeile auslesen video. Ohne die weiteren Zellinhalte zu kennen, habe ich Deinen
Code mal angepasst, so dass er für den konkreten Tabelleninhalt funktioniert:
versandmeng = (()[zeile, 7])(); // ## Zelle kann nicht gelesen werden
sdgnr = (()[zeile, 8])();
plz = (()[zeile, 12])();
($"Fehler beim lesen der Excelfile{wLine}{String()}");}}
--
Viele Grüsse
Peter Fleischer (ehem. MVP)
Meine Homepage mit Tipps und Tricks
Und zwar wrde ich gerne die Zeilen zhlen die Markiert sind und anschlieend in einer Variablen speichern. Hatte es mit dem unteren Befehl probiert, bekomme jedoch nur als Wert 1 raus.
2009 14:15:43
Hallo abu,
()
Gruß,
Ptonka
Geschrieben am: 12. 2009 14:29:42
Hallo Ptonka,
Danke, habe allerdings immer noch einen Fehler drinne in der Zeile
= ("Sheet1")("R" & ())
Siehst Du ihn? Hast Du auch eine Loesung fuers einfaerben? Und wie schreibe ich wenn es nicht nur fuer Sheet1 gelten soll, sondern fuer die gesamte Arbeitsmappe? Geschrieben am: 12. 2009 14:45:56
("Sheet1")("R" &)
so muss er lauten. Bleibt noch:
Kann da jemand helfen? Geschrieben am: 12. 2009 15:07:06
für jedes sheet:
("R" & ())
Farbe prüfen:
If lorIndex = xlNone Then
MsgBox "keine Farbe"
End If
Geschrieben am: 12. 2009 16:33:29
Klasse. Danke. Lesehilfe: aktuelle Zeile hervorheben | Excel Makro Bibliothek. Das mit der Mail hab ich jetzt hinbekommen und ich kann sogar ein Anhang anhaengen. Nun hab ich folgendes Problem:
Ich moechte gerne eine Abfrage machen: wenn Zell eingefaerbt dann nehme diesen Anhang wenn nicht diesen. Den Code habe ich ja... allerdings moechte ich noch Daten einfuegen und den Anhang umbenennen. Danach kann der Anhang geloescht werden allerdings nicht die Vorlagen.