Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1404to1408
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
1404to1408
1404to1408
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Speicherpfad funktioniert nicht

Speicherpfad funktioniert nicht
24.01.2015 04:03:11
Pan
Hallo zusammen,
kann mir jemand sagen warum der Speicherpfad hier nicht eingehalten wird? Gespeichert wird stattdessen einfach auf C:\documents\user\ und nicht wie festgelegt auf einem Serverlaufwerk. Makro läuft jedoch komischerweise ohne Fehlermeldung durch.
Sub Makro5Test()
Sheets(Array("AAAAA", "BBBBB", "CCCCC")).Select
Sheets("CCCCC").Activate
Sheets(Array("AAAAA", "BBBBB", "CCCCC")).Copy
P = "S:\Service\Mitarbeiter\Organisatorisches\Resa\Reservierungsblaetter\"
ActiveWorkbook.SaveAs Filename:=Format(Range("D1"), "yyyy_mm_dd, dddd")
ActiveWorkbook.Close savechanges
End Sub
Danke für Eure Hilfe.
Gruss, pan

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Speicherpfad funktioniert nicht
24.01.2015 06:57:08
Luschi
Hallo Pan,
das geht so: 

Sub Speichern_Neu()
Dim P As String
Sheets(Array("AAAAA", "BBBBB", "CCCCC")).Select
Sheets("CCCCC").Activate
Sheets(Array("AAAAA", "BBBBB", "CCCCC")).Copy
P = "S:\Service\Mitarbeiter\Organisatorisches\Resa\ _
Reservierungsblaetter\"
ActiveWorkbook.SaveAs Filename:=P & Format(Range("D1"), " _
yyyy_MM_dd, dddd"), FileFormat:=xlOpenXMLWorkbook
ActiveWorkbook.Close SaveChanges:=False
End Sub
Gruß von Luschi
aus klein-Paris
Anzeige

302 Forumthreads zu ähnlichen Themen

Code funktioniert plötzlich nicht mehr
Richard

Hallo,
folgender Code hat immer funktioniert, ich habe daran nichts geändert.
With Application With .CommandBars .Add(Name:="Testmenü").Visible = True End With ...
Ich muss aber irgndwo anders in Excel irgendwas verstellt haben, sodass ich beim Ausführen jetzt folgende Fehlermel...
12.08.2008 14:33:00
Thread-ID: 1001208
2 Beiträge
Anzeige
Select in BeforeSave funktioniert nicht. Bug?
Stefan


Hi!
Hab grad ein sehr merkwürdiges Problem. Vielleicht hat das von euch schon mal wer gesehen und weiß woran das liegt.
Die Select-Methode auf ein Worksheet Objekt funktioniert in einem bestimmten Fall nicht. Und zwar wenn sie in einer Sub aufgerufen wird, die von Workbook_BeforeSa...
10.09.2008 21:29:57
Thread-ID: 1008923
6 Beiträge
Makro mit Tastenkombination aufrufen?
Micha

Hallo liebe Spezialisten,
wie kann ich ein bestehendes Makro mit einer Tastenkombination aufrufen (Strg.X)
Bei dem Makrorecorder kenne ich die Möglichkeit, aber wie kann ich das bei einem schon bestehenden Code ändern.
Gruß
Micha
15.09.2008 12:56:00
Thread-ID: 1009761
4 Beiträge
Anzeige
Zufallsauswahl - Code funktioniert nicht
Mario

Hallo zusammen,
ich habe in Spalte A von Zeile 4 - 122 Namen und dazwischen Leerzellen stehen.
Nun möchte ich eine zufällig Auswahl treffen. Ich drücke die Zelle E1 so oft, bis die Namen alle aus Spalte A verschwunden sind. Sie sind dann von E2 bis E35 (je nach Namenanzahl).
Aber zw...
22.09.2008 12:10:51
Thread-ID: 1011438
3 Beiträge
Do Until - Schleife verlassen funktioniert nicht.
Stefan

Hallo Excelfreunde, bitte um Hilfe.
Do Until - Schleife mit Exit Do verlassen funktioniert nicht.
Abbruchbedingung: If TPFehlt = 1 Then Exit Do
Trotz längerem Suchen habe ich nicht herausgefunden, warum die Fehlermeldung kommt.
Sub Zuordnen() Dim letzteZeile As Integer, Nr As...
22.09.2008 20:53:34
Thread-ID: 1011569
3 Beiträge
Grafik in Userform funktioniert nicht
SteffenS

Hallo Zusammen,
der angehängte Code funktioniert unter Excel 2003 unter Excel 2007 funktioniert er leider nicht.
Woran kann dies liegen?
Option Explicit
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" ( _
ByVal lpClassName As String, _
ByVal lpWi...
24.09.2008 21:08:48
Thread-ID: 1012169
7 Beiträge
Makro funktioniert nicht mehr - Verweis?
otto

Hi,
Makro in anhängender Datei läuft nicht mehr. Kann mir jemand sagen warum?
Meine verwendeten Verweise sind auch dabei.
https://www.herber.de/bbs/user/56467.doc
Gruß
otto
03.11.2008 07:35:00
Thread-ID: 1021263
3 Beiträge
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

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
1
3
5
3
7
2
2
6
2
7
6
1
6
1
3
7
2
4
1
2
8
2
3
4
1