Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 10:31:56
Bilder in Userform per VBA aus Sharepoint Ordner anzeigen
16.04.2024 10:29:44
Mittelwert für Zeilen mit gleichen Zeitstempel
16.04.2024 09:54:17
Durchschnittswerte zwischen Tagen berechnen
16.04.2024 09:51:15
Frage: KPI - Logistik Dashboard
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
840to844
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
840to844
840to844
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

LZF 1004 nach Zell-Formatierung in VBA

LZF 1004 nach Zell-Formatierung in VBA
02.02.2007 12:24:52
Düppi
Liebe Excel-Profis,
folgender Code meldet LZF 1004 (Anwendungs- oder objektdef. Fehler) - ich weiß nicht, wie ich es abstellen soll. Es hakt bei der Formatierung der Rahmen und der Fett-Schrift. Wer weiß Rat, fragt Düppi?
Dim lz_red As Long
Dim x_red As Integer
Workbooks.Open Filename:="y:\Statistiken\" & "Excelstatistik_2007.xls"
lz_red = Workbooks("Excelstatistik_2007.xls").Sheets("Redaktionen").Range("A65536").End(xlUp).Row + 1
Workbooks("Excelstatistik_2007.xls").Sheets("Redaktionen").Range(Cells(lz_red, 1), Cells(lz_red, 25)).Borders.LineStyle = xlContinuous
Workbooks("Excelstatistik_2007.xls").Sheets("Redaktionen").Range(Cells(lz_red, 1), Cells(lz_red, 25)).Font.Bold = True

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: LZF 1004 nach Zell-Formatierung in VBA
02.02.2007 12:35:22
Ramses
Hallo
Sofern die Namen alle stimmen bleibt nur noch eines:
Die Tabelle "Redaktionen" muss aktiv sein
With Workbooks("Excelstatistik_2007.xls").Sheets("Redaktionen")
.Activate
.Range(Cells(lz_red, 1), Cells(lz_red, 25)).Borders.LineStyle = xlContinuous
.Range(Cells(lz_red, 1), Cells(lz_red, 25)).Font.Bold = True
End with
Gruss Rainer
AW: LZF 1004 nach Zell-Formatierung in VBA
02.02.2007 12:38:11
K.Rola 
Hallo,
beachte die Punkte vor Range und Cells
With Workbooks("Excelstatistik_2007.xls").Sheets("Redaktionen")
.Activate
.Range(.Cells(lz_red, 1), .Cells(lz_red, 25)).Borders.LineStyle = xlContinuous
.Range(.Cells(lz_red, 1), .Cells(lz_red, 25)).Font.Bold = True
End With

Keyboard not found, press F8 to continue or any key to abort!

Anzeige
AW: LZF 1004 nach Zell-Formatierung in VBA
02.02.2007 12:49:31
Düppi
Hallo Ramses, Hallo K.Rola,
Eure Lösungen funktionieren bestens - mit und ohne . vor Cells.
Besten Dank und schönes Wochenende aus Oelde! Gruß Düppi
AW: LZF 1004 nach Zell-Formatierung in VBA
02.02.2007 12:54:05
K.Rola
Hallo,
ohne die Punkte nur, wenn das Blatt aktiv ist.
Fruß K.Rola
AW: LZF 1004 nach Zell-Formatierung in VBA
02.02.2007 13:05:51
Ramses
Hallo K.Rola
Mit ".Activate" ist das Blatt aktiv :-)
Gruss Rainer
AW: LZF 1004 nach Zell-Formatierung => Folgeproble
02.02.2007 13:11:13
Düppi
Hallo Ramses und K.Rola,
das mit dem aktiven Blatt ist ja geklärt, aber nun möchte ich den Code um die Zeile
.Range(.Cells(lz_red, 1), .Cells(lz_red, 25)).Locked = True
ergänzen, um nach dem Formatieren (und dem Eintragen von Werten, die ich Euch vorenthalten habe, weil das klappt) die Zellen vor versehentlichem Löschen zu schützen.
Erneut LZF 1004: Die Locked-Eigenschaft ... kann nicht angewendet werden.
Bestimmt weiß einer von Euch beiden Rat, wie ich auch dieses letzte Problem noch lösen kann. Gruß Düppi
Anzeige
AW: LZF 1004 nach Zell-Formatierung => Folgeproble
02.02.2007 13:25:20
K.Rola
Hallo,
ist für mich nicht nachvollziehbar.
Gruß K.Rola
AW: LZF 1004 nach Zell-Formatierung => Folgeproble
03.02.2007 10:49:45
schauan
Hallöchen,
na eventuell ist das Blatt noch geschützt ;-)

Hoffe geholfen zu haben
Grüße von André aus Gera - Excel-97-2003

AW: LZF 1004 nach Zell-Formatierung in VBA
02.02.2007 13:11:31
K.Rola
Hallo Ramses,
das ging aus Fragers Frage nicht hervor.
Gruß K.Rola
AW: LZF 1004 nach Zell-Formatierung in VBA
02.02.2007 13:17:51
K.Rola
Hallo Ramses,
ich hatte einfach deinen Code kopiert und das .Activate übersehen.
Gruß K.Rola
Anzeige
AW: LZF 1004 nach Zell-Formatierung in VBA
02.02.2007 13:21:39
K.Rola
Hallo Ramses,
ich hatte einfach deinen Code kopiert und das .Activate übersehen.
Gruß K.Rola
????
02.02.2007 13:22:29
K.Rola
oT

303 Forumthreads zu ähnlichen Themen

In derTextBox das Format ändern
edie

Hallo zusammen,
würde gerne, wenn es möglich wäre, das Datum in der TextBox im Format TT.MM.YYYY
zurückschreibe in die Zelle A1 im Format YYYY-MM-TT 00:00 z. B. 2008-07-01 00:00
Wenn es möglich ist dann wie?
Hat jemand eine Idee und kann weiter helfen?
Danke im Voraus.
...
13.08.2008 15:27:49
Thread-ID: 1001560
3 Beiträge
Anzeige
Spalten als Text formatieren
Steffen

Hallo Leuts,
ich möchte gern die spalten B, D und F als Text formatieren. Habe da aber irgendeinen fehler drin.
ActiveSheet.Columns("B:B,D:D,F:F").NumberFormat = "@"
Das Format ändert sich leider nicht in Text.
Grúß
Steffen
15.09.2008 09:49:00
Thread-ID: 1009678
7 Beiträge
Formateierung von Textboxen in einer Userform
Textboxen

Hallo, nochmal 'ne warscheinlich blöde Frage:
Wie man Schriftart, Farbe etc. für Textboxen einstellt, bekomme ich hin. Aber
wie lege ich fest, dass es sich um das Format "Zahl" mit x Kommastellen oder
ähnliches handeln soll? - Hintergrund:
Auf einer Userform muß der Benutzer in...
16.09.2008 16:24:26
Thread-ID: 1010158
2 Beiträge
Anzeige
VBA Querdruck DinA5 auf DinA4 Hochformat
Peter

Hallo,
habe eine Userform die ich aufrufe, dort sind 2 CommandButtons auf die entweder auf DinA5 oder DinA4 gedruckt werden soll.
Habe nun den Makrorecorder laufen lassen.
Private Sub CommandButton1_Click() 'Sub Karte_Druck() ' Karte_Druck Makro Din A 4 Application.ScreenUpdating...
07.12.2008 11:40:36
Thread-ID: 1030830
3 Beiträge
VBA Bedingte Formatierung
Peter

Hallo,
möchte gern das Abhängig von A1 in der ein "w" oder ein "m" steht, das A2:Z22 alles entweder rosa (w)
oder hell bLau (m) ist.
Habt Ihr eine Idee?
Beim Druck soll nachher alles wieder schwarz weiß sein.
Gruß Peter
09.12.2008 22:32:36
Thread-ID: 1031538
20 Beiträge
Textbox und das Zeitformat
Rechsteiner

verstehe nicht viel von VBA, leider, habe die Eingabemaske ein bisschen abgeändert. Funktioniert eigentlich für meine bedürfnisse gut.
Das Problem: wenn ich über die Maske Zeit eintrage funktioniert es wunderbar, wenn ich aber im Tabellenblatt die Zeiten ändere bekomme ich in der Maske nich...
15.12.2008 16:28:00
Thread-ID: 1033081
4 Beiträge
Zahl im Text herausfinden vba
Harald

Hallo im Excelforum,
ich möchte aus einer Zelle in der Text und Zahlen stehen, eine sechstellige Zahl finden deren erste 3 Zahlen immer gleich sind zb 208xxx und das mit vba. In Spalte vier steht der Text und in Spalte 9 sollte dann nur noch die Zahl stehen.
mfg
Harald
30.12.2008 16:07:13
Thread-ID: 1036013
22 Beiträge
Datum in Textzeile - Probleme mit Format
Andreas

Hallo zusammen,
ich habe in Excel 2003 ein einfaches Rechnungsformular gebastelt. In diesem Formular gibt es eine Zelle mit dem Zellnamen "RE_Datum" und "Rechnungsbetrag". In diesen Zellen stehen das Datum der Rechnung und der Rechnungsbetrag in Euro. Nun möchte ich am Ende der Rechnung ein...
06.01.2009 20:32:00
Thread-ID: 1037351
3 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
3
6
1
1
2
19
3
21
2
7
6
9
1
3
15
1
1
2
3
2
2
2
5
1