Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1064to1068
1064to1068
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Find mein Makro nicht mehr

Forumthread: Find mein Makro nicht mehr

Find mein Makro nicht mehr
26.03.2009 22:53:46
jo_cindy
Ich hab echt Probleme. Hab ein Makro vor einiger Zeit geschrieben und es mit einem Button verlinkt. Es funktioniert auch noch, wollte mir aber mal den Code ansehen, weil ich dort evtl. Lösung für mein anderes Problem finde. Jetzt find ich aber das Makro nicht mehr, wo ich´s gespeichert hab. Den Namen kenn ich, wann es geschrieben wurde auch (Ínfos über Anpassen, Makro zuweisen). Wenn ich den Namen mit Endung xls über Suchen eingebe, find ich nix? Wie kann das sein? Wenn es gelöscht wäre, tät´s doch auch nicht mehr funtzen?
Anzeige

16
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Drück mal Alt+F11 ...
26.03.2009 23:06:12
Matthias
Hallo
mit Alt+F11 öffnest Du das VBA-Projekt
Dort müßtest Du im linken Fenster
DieseArbeitsmappe
Tabelle1
usw. sehen
es sind evtl. noch weitere Tabellen oder Module dort vorhanden
Dort müsste das Makro dann als Code irgendwo hinterlegt sein. ( Doppelklick z.B. auf ein Modul )
schau mal nach
Gruß Matthias
Anzeige
AW: Drück mal Alt+F11 ...
26.03.2009 23:09:56
jo_cindy
Hi Matthias, kann ich sehen, aber ich wollte wissen, wie bzw. wo es abgelegt ist und das find ich nicht raus!?
AW: Drück mal Alt+F11 ...
26.03.2009 23:28:43
Matthias
Hallo
so richtig Versteh nicht was Du meinst!
wenn du den Code sehen kannst, dann ist er im VBA-Projekt Deiner Datei abgelegt.
Dieser Code wird doch mit Deiner Datei abgespeichert.
Wenn Du von jeder Exceldatei aus den Code aufrufen kannst, könnte es noch sein der Code liegt in der
Personl.xls Diese ist so weit ich weiß standartmäßig ausgeblendet.
Userbild
Gruß Matthias
Anzeige
AW: Drück mal Alt+F11 ...
26.03.2009 23:39:14
jo_cindy
Hi Matthias, hab Geduld ;-) Also erstmal hab ich den Namen im Code nä(h)mlich Mitarbeiter mit dem Namen der Datein Report nach Mitarbeiter verwechselt. Dann kann ich es auch nicht finden. Das Fenster was du hast kann ich aber so nicht hinbekommen. Wie hast das Fenster geöffnet? Wenn ich über Menü Makros anzeigen gehen, dann zeigt es mir keine an. Hab aber das Makro in der geöffneten Exceldatei ablaufen lassen.
Anzeige
mit Alt+F8 ...
26.03.2009 23:48:39
Matthias
Hallo
mit Alt+F8
... stand doch eindeutig im Beitrag.
oder eben über die Symbolleiste.
Userbild
Gruß Matthias
AW: mit Alt+F8 ...
26.03.2009 23:58:30
jo_cindy
Ja sicher, hab ich auch gelesen, nur wie bereits geschrieben, da zeigt sich nichts im Fenster. Leer! Wenn ich über Menü/Extras/Makro gehe bekomme ich das Fenster, aber ohne Inhalt.
Anzeige
AW: mit Alt+F8 ...
27.03.2009 00:00:18
jo_cindy
Matthias, wie bekommst du den screen shot in den Text?
so jetzt nochmal ...
27.03.2009 00:26:12
Matthias
Hallo
das mit dem Screenshot machst Du über den

File-Upload


https://www.herber.de/forum/file_upload.html

so und nun nochmal zum mitschreiben.
In diesem Fenster siehst Du wirklich keine Makros ?
Ist den ein Modul vorhanden,wenn Du mit Alt+F11 den Projektexplorer öffnest ?
wenn ja, mache einen Doppelklick auf das Modul.
Steht dort irgendwo
Option Private Module ? das bewirkt das man keine Makros(in diesem Fenster) sehen kann.
...oder die Makros sind alle als Private Sub deklariert, dann lösche das Private
dann siehst Du auch die Makros wieder im Fenster.

und nochmal zum Beitrag mit dem Icons
Userbild
Gruß Matthias
Anzeige
AW: so jetzt nochmal ...
27.03.2009 00:37:00
jo_cindy
Hi Matthias,
ich dachte man kann irgendwie direkt ein Bild einfügen. Up load kenn ich schon, lern ja dazu.
https://www.herber.de/bbs/user/60728.doc
Ja, so sieht man das Makro, aber eben nicht über das Menü etc. Wie dem auch sei, ein Link wo es abgelegt ist, sehe ich auch nicht, war bei dir ja in dem dunkelblauen Balken zu sehen. Eigentliches Problem ist ja auch ein anderes. Wenn ich dieses Makro ausführe läuft alles gut, d.h. es öffnet sich kein neues Fenster indem die Datei zu sehen ist, wo ich das Makro erstellt habe. Ich mein mal über ein Forum erfahren zu haben, wie das geht und dachte es hat was mit dem Ort zu tun, wo es abgelegt ist. Meine anderen Makro machen nämlich leider immer ein Fenster parallel auf, was ich anschliessend schließend muss.
Anzeige
AW: so jetzt nochmal ...
27.03.2009 00:40:28
jo_cindy
Hier nochmal ein anderes Bild. Hab das Makro ablaufen lassen, vorher und nachher - kein Hinweis über F8
https://www.herber.de/bbs/user/60730.doc
lad die Mappe hoch
27.03.2009 00:50:53
Matthias
Hallo
lösche alle wichtigen/persönlichen Inhalte der Blätter und lad eine Kopie der Mappe hoch.
Dann kann man schauen, ob da irgendwas vorhanden ist
So kann ich Dir sonst nicht weiterhelfen.
Gruß Matthias
Anzeige
ist doch alles zu sehen ...
27.03.2009 08:48:32
Matthias
Hallo
Also mir ist es ein Rätsel, wieso Du bei Dir nichts siehst!
Hier Das Makro aus deiner Datei Modul1

Sub Bestellref()
' Bestellref Makro
' Makro am 25.03.2009 aufgezeichnet
Cells.Select
With Selection.Font
.Name = "Arial"
.Size = 8
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
End With
With Selection
.HorizontalAlignment = xlLeft
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.MergeCells = False
End With
Cells.EntireColumn.AutoFit
Columns("C:C").Select
Selection.EntireColumn.Hidden = True
Columns("F:K").Select
Selection.EntireColumn.Hidden = True
Range("L1").Select
ActiveCell.FormulaR1C1 = "Kommen"
Range("M1").Select
ActiveCell.FormulaR1C1 = "Kommten"
Range("L1").Select
ActiveCell.FormulaR1C1 = "Kommt Datum"
Range("N1").Select
ActiveCell.FormulaR1C1 = "Geht Datum"
Range("O1").Select
ActiveCell.FormulaR1C1 = "Gehen"
Columns("L:O").Select
Columns("L:O").EntireColumn.AutoFit
Columns("Q:R").Select
Selection.EntireColumn.Hidden = True
Columns("S:S").EntireColumn.AutoFit
Columns("S:S").EntireColumn.AutoFit
Columns("T:T").EntireColumn.AutoFit
Columns("U:V").Select
Selection.EntireColumn.Hidden = True
Cells.Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("L2") _
, Order2:=xlAscending, Key3:=Range("M2"), Order3:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range("M1").Select
ActiveCell.FormulaR1C1 = "Kommen"
Cells.Select
Selection.Sort Key1:=Range("D2"), Order1:=xlAscending, Key2:=Range("A2") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
Cells.Select
Selection.Subtotal GroupBy:=4, Function:=xlSum, TotalList:=Array(16), _
Replace:=True, PageBreaks:=False, SummaryBelowData:=True
Range("A1").Select
ActiveSheet.Outline.ShowLevels RowLevels:=2
End Sub


Und im Fenster ist es auch sichtbar.
Userbild
Gruß Matthias

Anzeige
AW: ist doch alles zu sehen ...
27.03.2009 12:36:14
jo_cindy
Ja, aber du hast ja auch auf meinem Doc. gesehen, dass es bei mir anders aussieht. Is ja auch egal, ich will einfach nur, dass bei Ausführung des Makros sich nicht ein neues Fenster mit dem Makro öffnet, sondern nur die zu bearbeitende Tabelle bearbeitet wird und gut.
AW: Drück mal Alt+F11 ...
26.03.2009 23:42:03
jo_cindy
Ich kann meine Makros nicht über Extras aufrufen, gibt es keine Auswahl. Ich habe den Makros in der Symboleiste Icons zugewiesen und darüber rufe ich ab.
Anzeige
AW: Drück mal Alt+F11 ...
27.03.2009 08:29:38
Jan_E 

Sub Bestellref()
' Bestellref Makro
' Makro am 25.03.2009 aufgezeichnet
Cells.Select
With Selection.Font
.Name = "Arial"
.Size = 8
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
End With
With Selection
.HorizontalAlignment = xlLeft
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.MergeCells = False
End With
Cells.EntireColumn.AutoFit
Columns("C:C").Select
Selection.EntireColumn.Hidden = True
Columns("F:K").Select
Selection.EntireColumn.Hidden = True
Range("L1").Select
ActiveCell.FormulaR1C1 = "Kommen"
Range("M1").Select
ActiveCell.FormulaR1C1 = "Kommten"
Range("L1").Select
ActiveCell.FormulaR1C1 = "Kommt Datum"
Range("N1").Select
ActiveCell.FormulaR1C1 = "Geht Datum"
Range("O1").Select
ActiveCell.FormulaR1C1 = "Gehen"
Columns("L:O").Select
Columns("L:O").EntireColumn.AutoFit
Columns("Q:R").Select
Selection.EntireColumn.Hidden = True
Columns("S:S").EntireColumn.AutoFit
Columns("S:S").EntireColumn.AutoFit
Columns("T:T").EntireColumn.AutoFit
Columns("U:V").Select
Selection.EntireColumn.Hidden = True
Cells.Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("L2") _
, Order2:=xlAscending, Key3:=Range("M2"), Order3:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range("M1").Select
ActiveCell.FormulaR1C1 = "Kommen"
Cells.Select
Selection.Sort Key1:=Range("D2"), Order1:=xlAscending, Key2:=Range("A2") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
Cells.Select
Selection.Subtotal GroupBy:=4, Function:=xlSum, TotalList:=Array(16), _
Replace:=True, PageBreaks:=False, SummaryBelowData:=True
Range("A1").Select
ActiveSheet.Outline.ShowLevels RowLevels:=2
End Sub


Hier ist dein Makro..musste nur Alt+F11 drücken^.
Mfg
Jan_E

Anzeige

Forumthreads zu verwandten Themen

Makro: Mail wird nicht erzeugt
Ralf

Hallo,
das folgende Makro blokiert in der Zeile 'Set mailitem = outobj.createitem(0)'
Sub Mail_Stammdaten() Dim ob, mailitem As Object Set ob = CreateObject("outlook.application") Set mailitem = outobj.createitem(0) On Error Resume Next With mailitem .Subject = "Neuanlage in Decalog"...
17.09.2008 11:49:20
Thread-ID: 1010312
5 Beiträge
Teilergebnis einer Spalte wird nicht angezeigt
thaake

Hallo,
ich lasse mir die Teilergebnisse verschiedener Spalten anzeigen mit =Teilergebnis(9;V5:V300), was auch überall klappt, aber nur eine Spalte weigert sich. Formatierung ist vollkommen ok, das Anzeigen in einer anderen Zelle mit Verweis auf diese Spalte klappt auch nicht. Summe dagegen...
22.09.2008 11:21:12
Thread-ID: 1011416
2 Beiträge
Inhalt von UF wird nicht angezeigt
UF

Hi Forum,
ich starte meine UF mit dem folgenden Code:
Sub auto_open() Application.WindowState = xlMinimized UF_BitteWarten.Show vbModeless Application.Run "RESETMASK" UF_BitteWarten.Hide UF_Maske.Show End Sub
Wie zu erkennen, wird beim Start ein Reset ausgeführt, der einige Sekun...
26.09.2008 14:29:02
Thread-ID: 1012639
16 Beiträge
Nicht geschützte Zelle wird nach Makro gesperrt
Gesa

Hallo liebes Forum,
ich habe das Makro "automatische Zeilenhöhe bei verbunden Zellen" in einer anderen Datei verwendet - hier läuft es einwandfrei.
Bei der beigefügten Datei ist es immer so, dass wenn in geschützten Zellen (die von der Grundeinstellung nicht geschützt sind) etwas eingeg...
16.10.2008 13:40:48
Thread-ID: 1016850
5 Beiträge
Anzeige
Filterergebnisse werden nicht angezeigt
hajo


Hallo zusammen,
wenn ich mit Autofilter einen Filter in VBA setze, wird mir das Ergebnis nicht angezeigt. Wenn ich die gleiche Aktion manuell ausführe bekomme ich das gewünschte Ergbniss. Kann mir jemand helfen?
Range("A1").Select
Selection.AutoFilter
Selection.AutoFilter F...
29.10.2008 12:43:42
Thread-ID: 1020236
5 Beiträge
Rechtschreibung: Pop-Up wird nicht mehr angezeigt
Norbert

Hallo,
nach dem Auswählen des Menüpunktes "Extras" - "Rechtschreibung", wird das zugehörige Pop-Up zur Auswahl der Korrekturvorschläge nicht mehr angezeigt.
Nach einem Klick auf die Schaltfläche "Rechtschreibung" ebenfalls nicht mehr.
Ich habe die möglichen Optionen zur Einstellung...
11.11.2008 11:22:22
Thread-ID: 1023480
3 Beiträge
Anzeige
langer Text wird nicht mehr angezeigt
u_hoernchen

Ich muss einen langen Text (ca. 1.500 Zeichen) in eine Excel-Zelle schreiben (geht leider nicht anders, also das bitte nicht in Frage stellen). Nun wird beim Ausdruck und bei der Bildschirmanzeige aber die letzte Zeile nicht mehr umgebrochen (Zeilenumbruch ist formatiert), in der Zelle steht ab...
05.01.2009 11:10:25
Thread-ID: 1036916
4 Beiträge
Anzeige
Makros werden nicht übertragen
Bernd


Hallo, liebe Excel-Freaks,
ich bitte Euch um Eure Hilfe. Nachstehendes Makro - das ich mit Hilfe dieses Forum erstellt habe - aktualisiert alle Blätter einer Abteilung mittels Sverweis und kopiert diese mit neuen Datei-Namen in ein Verzeichnis.
Leider kopiert das Makro dabei keine...
07.01.2009 13:21:00
Thread-ID: 1037519
2 Beiträge
Makros werden nicht übertragen
Bernd


Hallo, liebe Excel-Freaks,
ich bitte Euch um Eure Hilfe. Nachstehendes Makro - das ich mit Hilfe dieses Forum erstellt habe - aktualisiert alle Blätter einer Abteilung mittels Sverweis und kopiert diese mit neuen Datei-Namen in ein Verzeichnis.
Leider kopiert das Makro dabei keine...
07.01.2009 13:21:00
Thread-ID: 1037520
2 Beiträge
Makro wird nicht ausgelöst
werner

Hallo zusammen,
ich habe folgendes Makro geschrieben:
Private Sub Worksheet_Calculate() If Range("B6") = 1 Then Range("D4") = Range("D7") If Range("B6") = 2 Then Range("D4") = Range("D8") If Range("B6") = 3 Then Range("D4") = Range("D9") End If End If End If End Sub
Wenn in Zelle...
13.01.2009 21:37:00
Thread-ID: 1039394
11 Beiträge
Makro wird nicht ausgelöst
werner

Hallo zusammen,
woran könnte es liegen das das Makro nicht ausgelöst wird, wenn in Zelle N15 eine 1 steht (durch eine Formel)?
Gruß Werner
Sub ma5geez() Application.EnableEvents = False With Sheets("Gehälter") If .Range("N15") = 1 Then If MsgBox("soll die Erhöhung von " & .Ran...
26.01.2009 06:07:00
Thread-ID: 1043725
5 Beiträge
Makro wird nicht richtig ausgeführt!
markus473

Hallo zusammen,
das folgende Makro soll nach vorheriger Paßwortabfrage den Druckbereich bei allen selektierten Blättern festlegen.
Das Problem ist, der Druckbereich wird nur für das zuerst markierte Blatt festgelegt.
Wer kann mir sagen woran es liegen könnte!
Danke und Gruß Mark...
09.02.2009 16:37:09
Thread-ID: 1048707
2 Beiträge
Anzeige

Infobox / Tutorial

Makros in Excel finden und verwalten

Schritt-für-Schritt-Anleitung

  1. Öffne den VBA-Editor: Drücke Alt + F11, um das VBA-Projekt zu öffnen. Hier siehst du eine Struktur mit "DieseArbeitsmappe", "Tabelle1" usw.
  2. Projekt-Explorer anzeigen: Im linken Fenster solltest du alle Module und Tabellen sehen. Wenn der Projekt-Explorer nicht sichtbar ist, gehe zu Ansicht > Projekt-Explorer.
  3. Makros suchen: Doppelklicke auf ein Modul, um den Code zu sehen. Dein Makro sollte hier hinterlegt sein.
  4. Makros im Excel-Fenster anzeigen: Drücke Alt + F8, um das Fenster für die Makros zu öffnen. Wenn keine Makros angezeigt werden, liegt möglicherweise ein Problem mit der Sichtbarkeit vor.

Häufige Fehler und Lösungen

  • Makros werden nicht angezeigt: Stelle sicher, dass dein Makro nicht als Private Sub deklariert ist. Entferne das Wort Private, wenn nötig.
  • VBA-Projekt nicht sichtbar: Wenn der Projekt-Explorer nicht angezeigt wird, drücke Alt + F11 erneut oder gehe zu Ansicht > Projekt-Explorer.
  • Leeranzeige bei Alt + F8: Überprüfe, ob das Makro in einem Modul gespeichert ist und ob das richtige Projekt ausgewählt ist.

Alternative Methoden

  • Makro über die Symbolleiste ausführen: Wenn du ein Makro einem Button zugewiesen hast, kannst du es direkt von dort aus starten, ohne das Menü zu verwenden.
  • Makros manuell suchen: Wenn du den Namen deiner Datei kennst, kannst du im VBA-Editor nach dem Namen suchen, um das entsprechende Makro zu finden.

Praktische Beispiele

Angenommen, du hast ein Makro mit dem Namen Bestellref, das du finden möchtest. Hier ist ein Beispiel, wie der Code aussehen könnte:

Sub Bestellref()
' Bestellref Makro
Cells.Select
With Selection.Font
    .Name = "Arial"
    .Size = 8
End With
' Weitere Anweisungen hier...
End Sub

Um diesen Code zu sehen, öffne den VBA-Editor mit Alt + F11 und suche im Modul nach dem Namen des Makros.

Tipps für Profis

  • Einstellungen anpassen: Um alle Makros anzuzeigen, gehe zu Datei > Optionen > Sicherheitscenter > Einstellungen für das Sicherheitscenter und passe die Makrosicherheitseinstellungen an.
  • Makros in Personal.xls speichern: Wenn du möchtest, dass dein Makro in allen Excel-Dateien verfügbar ist, speichere es in Personal.xls. Diese Datei ist standardmäßig ausgeblendet, daher musst du sie eventuell sichtbar machen.

FAQ: Häufige Fragen

1. Warum wird mein Makro nicht angezeigt?
Es kann sein, dass es als Private Sub deklariert wurde. Überprüfe die Sichtbarkeitsoptionen im VBA-Editor.

2. Wie finde ich meine Makros, wenn ich sie nicht im Menü sehen kann?
Nutze Alt + F11, um den VBA-Editor zu öffnen. Dort solltest du in den Modulen nach deinem Makro suchen können.

3. Was ist der Unterschied zwischen Alt + F8 und Alt + F11?
Alt + F8 öffnet das Fenster, um Makros auszuführen, während Alt + F11 den VBA-Editor öffnet, wo du den Code deiner Makros bearbeiten kannst.

4. Wie kann ich Makros in Excel sichtbar machen?
Überprüfe die Makrosicherheitseinstellungen und stelle sicher, dass dein Makro nicht als privat deklariert ist.

Beliebteste Forumthreads (12 Monate)

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