Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 11:23:04
zählen wenn - aber nur die selektierten Zeilen
26.04.2024 10:08:11
Summieren von Zellen mit bedingter Formatierung
26.04.2024 09:08:00
Export alle Tabellenblätter als csv - in bestimmten Ordner
26.04.2024 08:56:40
Über alle Spalten nur €-Werte zählen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
700to704
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
700to704
700to704
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro funktioniert nicht

Makro funktioniert nicht
24.11.2005 16:39:17
ingo
Hallo!!!
Ich möchte ein Makro ausführen, welches ein neues Diagrammblatt einfügt. Dazu zeichne ich das Makro auf und kopiere dieses in meinem code. Aber im code funktioniert er nicht. Ich weiß nicht warum.
Folgenden Code zeichne ich auf:

Sub Makro12()
' Makro12 Makro
' Makro am 24.11.2005 von praktpse aufgezeichnet
'   Sheets("ADiagramm").Select
Charts.Add
ActiveChart.ChartType = xlXYScatterLines
ActiveChart.SetSourceData Source:=Sheets("ADiagramm").Range("D30")
ActiveChart.Location Where:=xlLocationAsNewSheet, Name:="AnalyseDiagramm"
ActiveChart.HasLegend = True
ActiveChart.Legend.Select
Selection.Position = xlBottom
Charts.Add
End Sub

Bei "ActiveChart.Legend.Select" hängt er sich auf und folgender Fehler wird angezeigt:
Laufzeitfehler 1004 "Die Select Methode des Legend Objektes konnte nicht ausgeführt werden"
Versteh ich nicht!!!!

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

Betreff
Datum
Anwender
Anzeige
AW: Makro funktioniert nicht
24.11.2005 17:21:12
Frank
Hallo Ingo,
anbei ein ungetesteter Lösungsansatz:

Sub Makro12()
Dim ws As Worksheet
Dim objChart As Chart
'Set ws = Worksheets("ADiagramm")
Set ws = ActiveSheet
ws.Activate
Set objChart = Charts.Add
With objChart
.ChartType = xlXYScatterLines
.SetSourceData Source:=ws.Range("D30")
.Location Where:=xlLocationAsNewSheet, Name:="AnalyseDiagramm"
.HasLegend = True
.Legend.Position = xlLegendPositionBottom
End With
Set objChart = Nothing
Set ws = Nothing
End Sub

Wenn es nicht funktioniert lade mal Deine Tabelle hoch!
Viel Erfolg
Frank
Anzeige
AW: Makro funktioniert nicht
24.11.2005 17:24:30
Erich
Hallo Ingo,
das liegt am "blöden" Select aus der Makroaufzeichnung. Wenn du statt 

ActiveChart.Legend.Select
Selection.Position = xlBottom

schreibst: 

ActiveChart.Legend.Position = xlBottom

sollte es funzen (ungestestet).
Nebenfrage: Ist das zweite "Charts.Add" am Ende gewollt?
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
AW: Makro funktioniert nicht
24.11.2005 17:45:19
ingo
Gut Probier ich morgen einmal aus!!!
Ich hoffe das das alles ist..
Besten Dank und Gruß Ingo!!!
AW: Makro funktioniert nicht
25.11.2005 07:44:13
ingo
Moin Moin!!!
Habe die Codeänderung ausprobiert.
Funktioniert aber nicht. Brauch einen neuen Tipp
Anzeige
AW: Makro funktioniert nicht
25.11.2005 09:36:46
Erich
Hallo Ingo,
ein Tipp, den dir Frank schon gegeben hat:
"Wenn es nicht funktioniert lade mal Deine Tabelle hoch!"
Hast du Franks Makro denn ausprobiert?
Grüße von Erich aus Kamp-Lintfort

309 Forumthreads zu ähnlichen Themen

Makro: Mail erzeugen funktioniert noch nicht
Ralf

Hallo,
folgendes Makro zur Erzeugung einer Mail funktioniert noch nicht.
Sub Mail_Stammdaten() Dim ob, mailitem As Object Set ob = CreateObject("outlook.application") Set mailitem = ob.CreateItem(0) On Error Resume Next With mailitem .Subject = "Neuanlage in Decalog" .To = "gerhard.ju...
18.09.2008 16:07:50
Thread-ID: 1010784
8 Beiträge
Anzeige
Filter-Makro funktioniert nicht
Wolfango

Hallo Experten,
die Spalte Q einer Datenbank enthält Datumswerte.
Wenn ich nun einen benutzerdefinierten Filter (vorher Autofilter aktiviert) setze mit den Kriterien "ist kleiner oder gleich" "31.12.2008" funktioniert das einwandfrei. Die gesuchten Werte werden wie gewünscht angezeigt...
04.11.2008 10:28:00
Thread-ID: 1021496
8 Beiträge
Makro funktioniert nicht richtig, Werte auslesen
Uwe

Hallo zusammen, habe folgendes Problem in dem beigefügtem Makro funktioniert es nicht das er die Werte 2 und 3 aus der Tabelle ausliest. Wert 1 geht wunderbar. Hat jemand eine Lösung?
Hallo Uwe,
unregelmäßig aufgebaute Tabellen per Makro abzuarbeiten ist immer ziemlich aufwendig zu prog...
07.11.2008 08:22:00
Thread-ID: 1022502
2 Beiträge
Anzeige
Makro funktioniert nicht
Diegel,

Hallo,
ich bin schon fast am verzweifeln.
Ein Makro funktioniert in der einen Datei und in der anderen Datei nicht. Obwohl ich genau dasselbe hinein kopiert habe.
Woran kann es liegen?
Viele Grüße von der Nordsee
Peter
12.03.2009 17:20:12
Thread-ID: 1059586
3 Beiträge
Makrorekorder funktioniert nicht richtig
peter

Hallo Profis,
hätte mal eine Frage zum Makrorekorder. Wenn ich es aufzeichne und dann abspiele funktionierts nicht.
Ich will einen Autofilter setzten, der diverse Zellen ausblendet, und die noch sichtbaren will ich in ein anderes Tabellenblatt kopieren...aber warum will er nicht?
'M...
22.03.2009 20:46:13
Thread-ID: 1062704
5 Beiträge
Makro funktioniert nicht
mike49

Hallo,
ich habe ein bestehendes Makro versucht zu erweitern, das aber misslungen ist.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("E8:E38")) Then Cancel = True If Target = "" Then Target = "9:15" Else Target = "...
29.03.2009 11:08:37
Thread-ID: 1065018
5 Beiträge
Makro aus Excel 2003 funktioniert nicht in Ex 2007
Lene

Hallo zusammen,
ich habe in 2003er Version ein kleines Makro, das in der 2007er Version einen Fehler verursacht.
Hat jemand einen Tipp, woran es liegt ich wie man das Makro so umschreiben kann, dass es in möglichst vielen Excel-Versionen läuft? Der künftige Benutzerkreis hat leider dive...
07.04.2009 19:27:56
Thread-ID: 1067511
9 Beiträge
Makro funktioniert nicht mehr
Wolfgang

Hallo,
obwohl ich leider keine Ahnung von VBA habe; Perl ist mir da lieber; konnte ich mir trotzdem vor längerer Zeit mit Hilfe verschiedenen Foren eine Makro zusammen bauen.
Dieses Makro macht folgendes unter Excel 2003.
In die erste Spalte "A" werden manuell Artikelnummern eingebe...
14.10.2009 20:56:20
Thread-ID: 1109687
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
7
2
7
1
2
2
4
4
8
2
2
2
22
2
22
2
9
8
6
10
5
3
7
1
1