|
Excel : Alle Tabellenblätter über Befehlszeile drucken
Thomas Harmening am 18.07.2012 um 20:06 Uhr (0)
hmm, mittels vbs würde ja sowas gehenCode:Dim exDim DateiDim BlattIf WScript.Arguments.Count 0 Then Parameter prüfen Datei = WScript.Arguments(0) Else MsgBox "Es wurde keine Datei angegeben!" bei Fehler, Meldung und beenden WScript.QuitEnd IfSet ex = GetObject(Datei) Verbindung zu ExcelFor Each Blatt In ex.Worksheets alle Arbeitsblätter ausdrucken Blatt.PrintOutNextex.Close XL-Datei schließenund wie hast du es nur über die Endung(Dateierweiterungen?) ...
|
| In das Form Excel wechseln |
|
Excel : Zeilen vergleichen - einfärben und Summen bilden
lumbesack am 25.07.2012 um 09:55 Uhr (0)
Hallo Leute,ich hoffe, dass Ihr mir bei meinem Problem helfen könnt.Um es gleich vorweg zu nehmen - es soll, wenn möglich, eine triviale Lösung sein, dar ich mit Excel so gut wie garnicht am Hut habe.Ich soll für eine Projektarbeit in der Firma ein Excel-Sheet erstellen, welches folgenden Kriterien gerecht wird:- es soll ähnlich aussehen, wie das Excel-Sheet- bei gleichen Datensätzen soll eine farbliche Markierung erfolgen- das ganze am besten in VBA, sodass keine manuelle Arbeit mehr nötig ist.Alle weiter ...
|
| In das Form Excel wechseln |
|
Excel : Mehrere Zellen in neuer Datei&/Tabellenblatt ausgeben
Paulchen am 25.07.2012 um 16:41 Uhr (0)
Hallo und Willkommen auf CAD.de ,zu 1): Guck mal, ob Du anstelle vonCode:cell.EntireRow.Copy Destination:=Tabelle2.Rows(i)mitCode:cell.EntireRow.Copy Paste...#NeueMappeNeuesRegisterund ggf. der Hilfe weiterkommst?zu 2) Naja, Dein i ist eins, also geht es auch beim Einfügen in der ersten Zeile los, egal, was da drin steht. Eine Möglichkeit wäre, für das Einfügen den Zähler um die Anzahl der belegten Zeilen im Zielregister zu erhöhen, also ...Tabelle2.Rows(i+3)Allerdings bin ich mir unsicher, ob dann nicht ...
|
| In das Form Excel wechseln |
|
Excel : Mehrere Zellen in neuer Datei&/Tabellenblatt ausgeben
Phildi am 27.07.2012 um 09:45 Uhr (0)
Hey Karin,danke für die Info ... hatt ein bisschen gedauert bis ich durch deinen Code durchgestiegen bin ;-) die Mühen eines Anfängers eben. Hab ihn aber auch mal ausprobiert und es kommen auch keine Fehlermeldungen mehr aber ansonsten passiert nichts. Beide Files geöffnet, Makros aktiviert, Code im Tabellenblatt mit den Ausgangsdaten hinterlegt, ...Was mach ich nur falsch
|
| In das Form Excel wechseln |
|
Excel : Mehrere Zellen in neuer Datei&/Tabellenblatt ausgeben
Beverly am 26.07.2012 um 09:39 Uhr (0)
Hi Phil,versuche es mal so (ungetestet):Code:cell.EntireRow.Copy Destination:=Workbooks("Zielmappe").Tabelle2.Rows(i + 3)------------------Bis später,Karin
|
| In das Form Excel wechseln |
|
Excel : Mehrere Zellen in neuer Datei&/Tabellenblatt ausgeben
Phildi am 26.07.2012 um 12:09 Uhr (0)
Danke euch beiden für die Tipps... Ich beschäftige mich erst seit ein paar Tagen mit Visual Basic und lerne jetzt zwar immer mehr ... aber es dauert auch seine Zeit Ich habe eure Hinweise mal eingearbeitet ... Habe jetzt aber nen Laufzeitfehler9...Allerdings ist doch mein Index i.o. !Hab hier nochmal den Code:Code:Public Sub Zeilen2()Dim i As IntegerDim cell As Rangei = 1For Each cell In Tabelle1.Range("H:H")If Not cell Is Nothing Then If cell.Value = "Hoch" Then cell.EntireRow.Copy Destination:=Workbo ...
|
| In das Form Excel wechseln |
|
Excel : Mehrere Zellen in neuer Datei&/Tabellenblatt ausgeben
Paulchen am 26.07.2012 um 13:12 Uhr (0)
Hi,zwei Sachen:1) Tabelle2.Rows(1) - da steht ne 1, kein "i"?2) Ab Office 2007 müssen Mappen mit Makros auf ".xlsm" enden. Keine Ahnung, ob das beim Zugriff "von außen" auch eine Rolle spielt, Dein Verdacht könnte richtig sein -- Google?(Sonderzeichen - wie z. B. "ä" im Dateinamen - vermeide ich persönlich.)------------------DIN1055.de | Lastannahmen für Anwender
|
| In das Form Excel wechseln |
|
Excel : Mehrere Zellen in neuer Datei&/Tabellenblatt ausgeben
Phildi am 26.07.2012 um 16:03 Uhr (0)
Danke für die Hinweise Paul ... ich habe jetzt einfach nochmal von Vorne angefangen und habe festgestellt, dass die Laufzeitfehler(jetzt 438) dann auftauchen wenn ich bei als Ausgabeziel folgendes angebe: Code:cell.EntireRow.Copy Destination:=Workbooks("Themen_Prioritaet_HOCH.xlsm").Tabelle2.Rows(i + 4)Lasse ich als Ziel ein einfaches Tabellenblatt in der gleichen Datei funktioniert das Ding einwandfrei.Ich habe jetzt nochmal ne google-Recherche gemacht aber komme zu keiner Lösung. P.S. Die Dateitypen habe ...
|
| In das Form Excel wechseln |
|
Excel : Mehrere Zellen in neuer Datei&/Tabellenblatt ausgeben
Beverly am 26.07.2012 um 16:20 Uhr (0)
Hi Phil,meines Wissens kann man nicht so ohne Weiteres auf den Codenamen aus einer anderen Arbeitsmappe referenzieren - das geht nur über einen Umweg. Versuche es mal so:Code:Public Sub Zeilen2() Dim i As Integer Dim rngZelle As Range Dim wksTab As Worksheet i = 1 With Workbooks("Themen_Priorität HOCH.xlsx") For Each wksTab In .Worksheets If wksTab.CodeName = "Tabelle2" Then Exit For Next wksTab End With For Each rngZelle In Tabelle1.Columns("H:H").SpecialCells(xlCellTypeCons ...
|
| In das Form Excel wechseln |
|
Excel : Mehrere Zellen in neuer Datei&/Tabellenblatt ausgeben
Phildi am 25.07.2012 um 14:23 Uhr (0)
Hallo an alle Experten,ich bin Student und versuche gerade für ein Projekt eine Datenbank zu erstellen. Dabei möchte ich eine Analyse programmieren. Ich möchte, dass Datensätze(jeder 9 Spalten lang) in eine neue Exceldatei kopiert werden. Dazu habe ich mal folgendes Makro erstellt:Public Sub Zeilen2()Dim i As IntegerDim cell As Rangei = 1For Each cell In Tabelle1.Range("H:H")If Not cell Is Nothing Then If cell.Value = "Hoch" Then cell.EntireRow.Copy Destination:=Tabelle2.Rows(i) i = i + 1 End IfEnd ...
|
| In das Form Excel wechseln |
|
Excel : Mehrere Zellen in neuer Datei&/Tabellenblatt ausgeben
Beverly am 27.07.2012 um 15:14 Uhr (0)
Hi Phil,weshalb den Code im Tabellenblatt? Von allein passiert da doch nichts, irgendwie muss der Code ja angestoßen werden - z.B. durch das Worksheet_Change-Ereignis des Tabellenblattes. So wie der der Code jetzt ist, müsste er in einem allgemeinen Modul stehen und über die Makroauswahl gestartet werden.------------------Bis später,Karin
|
| In das Form Excel wechseln |
|
Excel : Excel VBA Zellen eines Datenblatts ans Ende eines anderen Datenblatts kopieren
daniu am 09.08.2012 um 11:39 Uhr (0)
Hi,Danke für das feedback.Kann ich mir kaum vorstellen. Beide Tabellenblätter werden kurz vorher erzeugt, indem eine (Text)Datei geöffnet wird und dann in die Arbeitsmappe kopiert wird.Gleiches Dateiformat, gleicher ProzessGrüßeDaniel
|
| In das Form Excel wechseln |
Sample.txt |
Excel : Excel VBA Zellen eines Datenblatts ans Ende eines anderen Datenblatts kopieren
daniu am 09.08.2012 um 12:18 Uhr (0)
Hi,Datei muss in XLSM umbenannt werden. Sorry: ich verwende Office 2010GrußDaniel
|
| In das Form Excel wechseln |
