Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
260to264
260to264
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Error 1004 die 1004te, aaarg

Forumthread: Error 1004 die 1004te, aaarg

Error 1004 die 1004te, aaarg
25.05.2003 15:31:43
Rudolf
Hallo,

das Makro unten bricht nach
With rngZelle.Borders(xlInsideHorizontal)
beim Zugriff mit Error 1004 ab.
Komisch
rngZelle.Borders(xlInsideHorizontal).LineStyle = xlLineStyleNone

weiter oben im Makro geht doch auch.

Danke für Hilfe.

Gruß von Rudolf



Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Error 1004 die 1004te, aaarg
25.05.2003 16:24:38
Ramses

Hallo,

Du hast einen logischen Fehler in deîner Anweisung.

With rngZelle.Borders(xlInsideHorizontal)

kann nur zugewiesen werden, wenn mehrere Zellen untereinander markiert sind !!!
Auf eine einzelne Zelle ist der Befehl nicht anwendbar.

Sorry,... da musst du noch ein wenig Brain-Storming betreiben ;-)

Gruss Rainer


Anzeige
Hmmm, grübel, aber
25.05.2003 16:43:37
Rudolf


Hallo Rainer,

stimmt, Du hast Recht, geht nur so wie Du erwähnt hast mit
mindestens zwei Zellen untereinander.

...aber, hmmm, demnach kann man eine einzelne Zelle gar
nicht mit einem "Border" komplett waagrecht durchstreichen.
Schade, wäre optisch ein schönes Stilmittel für meinen Zweck gewesen.

Danke nochmal für den Tipp,

Rudolf.

Anzeige
Grübel, Grübel und studier....
25.05.2003 16:48:40
Ramses

Hallo,

als Alternative zur horziontalen Linie vielleicht

ActiveCell.Value = "--------------"

Gruss Rainer

Re: Hmmm, grübel, aber
25.05.2003 17:17:49
Georg_Zi

Hallo Rudolf

Vielleicht hilft Dir folgendes

Gruß Hajo

Der Code wurde getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Zur Zeit ist die automatische E-Mailbenachrichtigung abgeschaltet. Damit ist es dem Zufall überlassen, ob ich auf Rückfragen antworte.
Ich habe keine Lust in gewissen Abständen das Forum nach meinen Beiträgen zu durchsuchen, um zu sehen ob Rückfragen gibt.

Anzeige
Hey, pfiffige Idee, man
25.05.2003 20:45:53
Rudolf


Hallo,

man lernt echt nicht aus.

Bis jetzt hab ich "-" gepaart mit "x" in Fett umgesetzt,
sieht optisch auch ganz OK aus,
(Projekt: Logistiktrainer ala PM)

Aber das mit den Shapes öffnet noch mehr Türen für Ideen,
klappt auch noch mit Excel97,

vielen Dank und Gruß von
Rudolf.

Anzeige
;

Forumthreads zu verwandten Themen

X-Achse innerhalb eines OWC10.Objektes
Marc

Guten Tag zusammen ..
da der Topic etwas limitiert ist werde ich hier versuchen mein Problem einwenig zu verdeutlichen .. folgendes stellt sich mir dar
ich versuche eine Unmenge an Daten mittels eines OWC10.Objektes innerhalb einer Userform garphisch darzustellen. Dabei werden die minut...
12.08.2008 13:39:59
Thread-ID: 1001188
3 Beiträge
Hilffeeee: Laufzeitfehler 1004
Tanya

Hallo,
ich habe eine Makro, die mehrere Diagramme aktualisiert.
codeabschnitt:
Sheets("Druck-stat").Select
ActiveChart.SeriesCollection(1).XValues = "=Mitteldaten!R9C2:R" & hilfs & "C2"
ActiveChart.SeriesCollection(1).Values = "=Mitteldaten!R9C5:R" & hilfs &...
14.08.2008 15:35:58
Thread-ID: 1001894
2 Beiträge
Initialwert bei string * 10
Eddie

Hallo,
ich habe ein kleines Problem mit der Type Anweisung.
Ich definiere in der Struktur u.a.
Type TestTest teststring As String * 10 End Type Dim Test(500) As TestTest
Zu meinem erstaunen, steht in z.B. Test.teststring, bevor die Variable das erste mal beschrieben wurde, 10...
15.08.2008 11:03:00
Thread-ID: 1002107
4 Beiträge
Anzeige
Wenn-Dann + SVERWEIS ???
B@sti

Hallo zusammen,
ich bräuchte zu folgendem Thema eure Hilfe:
und zwar geht es um den Abgleich zweier Arbeitmappen. In der ersten Arbeitsmappe befinden sich die Infos, aus der ein Ergebnis für die zweite Arbeitsmappe ausgelesen werden soll. Hab mal ne Beispieldatei angehängt:
https://...
21.08.2008 10:54:00
Thread-ID: 1003404
4 Beiträge
MSGBox wenn Zelleninhalt geleert wurde?!
Tom

Hallo!
Ist es denn eigentlich möglich zu überprüfen ob eine Zelle gerade geleert wurde?
Hintergrund ist, dass ich gern sicherstellen möchte, dass der User wirklich den Zelleninhalt löschen wollte.
Ich würde gern eine Mitteilung erscheinen lassen wenn eine Zelle vom Inhalt her gelösc...
26.08.2008 15:07:01
Thread-ID: 1004826
6 Beiträge
Anzeige
"wenn, dann, sonst" - Frage
Oliver

Hallo,
kleines Problem,
=WENN($I$4=4;4;0) liefert mir den Wert "0"
Jetzt habe ich diese Formel folgendermaßen abgeändert:
=Wenn((Istfehler(A1);"";Wenn($I$=4;4;0))
... dies liefert mir wieder den Wert "0", obwohl Istfehler(A1) erfüllt wird -confused-
Nun meine Frage,...
11.09.2008 10:23:00
Thread-ID: 1008998
16 Beiträge
"Wenn Zeit > 17.30 Uhr dann"
Susanne99

Hallo,
wie formuliere und formatiere ich den o.g. Ausdruck als Formel?
Gruß
Susanne
14.09.2008 23:24:58
Thread-ID: 1009640
6 Beiträge
zeile ermitteln aus : A10:C26
reinhardt

Hallo.
In A1 stehen Range-Werte in folgender Form: A10:C26, oder BC150:M299
Ich möchte alle Zeilen oberhalb von A10 (1 ...9) oder BC 150 (1...149) ausblenden.
Dazu brauche ich einmal Hilfe bei einer Formel, die mir den Wert 9 aus A10:C26 oder
den Wert 149 aus BC150:M299 erre...
19.09.2008 09:22:00
Thread-ID: 1010909
2 Beiträge
Wenn Zelle leer, dann Grafik löschen
TomTom

Hi,
ich möchte auf meinem Sheet abprüfen, ob die Zelle A41 und B41 leer sind, und wenn ja, soll eine Grafik (.bmp / wurde eingefügt mit Kopieren und einfügen und heisst im Namensfeld "Bild 01")
gelöscht oder unsichtbar werden.
Wie mache ich dies ?
Danke mal
Gruss
Tom<...
22.09.2008 08:28:10
Thread-ID: 1011373
3 Beiträge
Anzeige
Tabellenblattnahme, Beitrag 1008-1012 21.09.08
Werner

Hallo Daniel,
Deine Hilfe mit den Code:
Private Sub Worksheet_Change _ (ByVal Target As Range) If Target.Address = "$D$12" Then TabelleXXX.Name = Range("D12").Value End If End Sub
hat Super funktioniert, nochmals Danke!!
Nun habe ich aber noch ein weiteres Problem, ich habe...
24.09.2008 22:57:34
Thread-ID: 1012192
4 Beiträge
Anzeige
Laufzeitfehler 1004
Jörg

Ich erhalte einen merkwürdigen Fehler, bei ug. Script. Die Zeile
"Range(Cells(intRow, 1), Cells(intRow, 2)).Select" löst den "Laufzeitfehler 1004 / Anwendungs- oder objektorientierter Fehler" aus.
Ich kann hier keinen Fehler entdecken. Woran liegt's? Gibt's eine Idee? Danke für Eure Mü...
29.09.2008 11:35:58
Thread-ID: 1013056
10 Beiträge
Makro unterbrechen wenn bestimmte Zelle leer
WalterK

Guten Morgen,
wer kann mir beim folgenden Code eine kleine Änderung durchführen:
1.) das Makro sollte abgebrochen werden, wenn im Blatt "Daten" die Zelle "AB12" leer ist und
2.) es sollte eine MsgBox mit dem Hinweis kommen, dass die Eingabe bei "AB12" fehlt und das sollte mit OK bes...
03.10.2008 07:29:45
Thread-ID: 1013985
10 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige