Thema Datum  Von Nutzer Rating
Antwort
10.01.2011 12:29:07 Marvin F
NotSolved
10.01.2011 13:41:59 Severus
NotSolved
10.01.2011 14:22:16 Marvin F
NotSolved
10.01.2011 14:48:17 Severus
NotSolved
10.01.2011 15:06:02 Marvin F
NotSolved
Blau Aw:Laufzeitfehler 1004 Methode Range Objekt Glo
10.01.2011 15:20:09 Severus
Solved
11.01.2011 12:29:56 Gast76496
NotSolved
11.12.2019 13:28:40 Gast50525
NotSolved
11.12.2019 13:31:29 Gast16739
NotSolved
11.12.2019 14:26:57 Gast41452
NotSolved
11.12.2019 14:05:15 Gast35228
NotSolved
11.12.2019 14:58:37 Gast47662
NotSolved
12.12.2019 08:19:53 Gast48223
NotSolved
12.12.2019 08:20:27 Gast86980
NotSolved
12.12.2019 12:02:00 M. Sokaliwska
NotSolved

Ansicht des Beitrags:
Von:
Severus
Datum:
10.01.2011 15:20:09
Views:
2131
Rating: Antwort:
 Nein
Thema:
Aw:Laufzeitfehler 1004 Methode Range Objekt Glo
Marvin F schrieb am 10.01.2011 15:06:02:

Oh Erhabener, wenn Du den Befehl ".Clear" verwendest werden natürlich auch alle Formatierungen gelöscht!
Benutze ".ClearContents", dann sollte es gehen.
Severus

Wo genau muss ich den Befehl denn einfügen?
Ich habe es jetzt direkt hinter der Range Anweisung gemacht, da mir eine andere Position nicht schlüssig erschien.

Der Code sieht jetzt wie folgt aus:
If Range("DataStart").Parent.Name.ClearContents <> Sh.Name Then

Leider entsteht so ein neuer Fehler:
Laufzeitfehler '424':
Objekt erforderlich

Statt
Set rngGoalData = .Range("DataGoal").CurrentRegion
If rngGoalData(1, 1).Row < .Range("DataGoal").Row Then
rngGoalData.Offset(.Range("DataGoal").Row - 1, 0).Clear
Else
.Range("DataGoal").CurrentRegion.Clear
End If

Verwende
Set rngGoalData = .Range("DataGoal").CurrentRegion
If rngGoalData(1, 1).Row < .Range("DataGoal").Row Then
rngGoalData.Offset(.Range("DataGoal").Row - 1, 0).ClearContents
Else
.Range("DataGoal").CurrentRegion.ClearContents
End If

Severus

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
10.01.2011 12:29:07 Marvin F
NotSolved
10.01.2011 13:41:59 Severus
NotSolved
10.01.2011 14:22:16 Marvin F
NotSolved
10.01.2011 14:48:17 Severus
NotSolved
10.01.2011 15:06:02 Marvin F
NotSolved
Blau Aw:Laufzeitfehler 1004 Methode Range Objekt Glo
10.01.2011 15:20:09 Severus
Solved
11.01.2011 12:29:56 Gast76496
NotSolved
11.12.2019 13:28:40 Gast50525
NotSolved
11.12.2019 13:31:29 Gast16739
NotSolved
11.12.2019 14:26:57 Gast41452
NotSolved
11.12.2019 14:05:15 Gast35228
NotSolved
11.12.2019 14:58:37 Gast47662
NotSolved
12.12.2019 08:19:53 Gast48223
NotSolved
12.12.2019 08:20:27 Gast86980
NotSolved
12.12.2019 12:02:00 M. Sokaliwska
NotSolved