Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1860to1864
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
1860to1864
1860to1864
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro f. Vrolage geht nicht mehr

Makro f. Vrolage geht nicht mehr
04.01.2022 14:26:06
Malte
Hallo in die Runde,
Anfang letzten Jahres hatte ich hier eine Anfrage zu einer dynamsichen Vorlage für neue Tabellenblätter gestellt. Mir wurde rasch von einem Nutzer namens onur geholfen, der mir ein kurzes Makro für den gewünschten Job in die Tabelle schrieb. Für das neue Jahr habe ich jetzt Inhalte sowie die letzjährigen Blätter aus der Tabelle gelöscht, seitdem funktioniert das Makro nicht mehr. Statt die gewünschte vorformatierte Vorlage erzeugt es ein neues Standardblatt in der Tabelle.
Die Tabelle hängt an, was mache ich falsch? (Excel Version ist 2111 / 365)
Viele Dank schon mal!
https://www.herber.de/bbs/user/150143.xlsm

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro f. Vrolage geht nicht mehr
04.01.2022 16:08:30
Nepumuk
Hallo Malte,
teste mal:

Option Explicit
Private Sub Workbook_NewSheet(ByVal sh As Object)
Dim lngRow As Long, lngProjectRow As Long
Dim objWorksheet As Worksheet
Dim strSearchText As String
With Worksheets("Kerndaten")
For lngRow = 3 To .Cells(.Rows.Count, 1).End(xlUp).Row
strSearchText = .Cells(lngRow, 1).Text & " - " & .Cells(lngRow, 2).Text
For Each objWorksheet In ThisWorkbook.Worksheets
If strSearchText = objWorksheet.Name Then
lngProjectRow = lngRow + 1
Exit For
End If
Next
Next lngRow
If lngProjectRow = 0 Then lngProjectRow = 2
If Not IsEmpty(.Cells(lngProjectRow, 1).Value) Then
sh.Name = strSearchText
Call Worksheets("Vorlage").Cells.Copy(Destination:=sh.Cells(1, 1))
sh.Cells(1, 30).Value = lngProjectRow
End If
End With
End Sub
Gruß
Nepumuk
Anzeige
AW: Makro f. Vrolage geht nicht mehr
05.01.2022 09:42:15
Malte
Funktioniert wieder, vielen Dank Nepumuk!

316 Forumthreads zu ähnlichen Themen

Kann Zeilen, die DA SIND, nicht mehr einblenden!!!
Stephan

Liebe Liste,
habe hier ein Problem, das mich fast verzweifeln läßt!
Ich habe 4 Zeilen am Anfang einer Datei, die sich partout nicht mehr einblenden lassen! Ich kann dort mit den Pfeiltasten der Tastatur hinlaufen, sehe oben in der Wertezeile auch den Wert der Zellen, in denen Inhalt ste...
25.01.2009 12:52:00
Thread-ID: 1043550
11 Beiträge
Anzeige
wenn Bild hinterlegt, geht nichts mehr (Userform)
Reinhard

Hallo zusammen
ich habe folgende Userform Die Datei https://www.herber.de/bbs/user/61474.xls wurde aus Datenschutzgründen gelöscht
diese funktioniert einwandfrei!
wenn ich aber als Hintergrund ein Image (Anzeige) hinterlege, funktioniert nichts mehr. Wieso ist das so?
kann man...
29.04.2009 08:10:29
Thread-ID: 1071763
4 Beiträge
PrintOut copies:= geht nicht mehr
Jupp

Hallo.
Ich habe vor längerer Zeit ein größeres Makro geschrieben, bei dem unter anderem bei einem Button-Klick entsprechende Seite gedruckt werden.
Meine User rufen das Makro aus einer xls via Terminal Server auf. Bisher war dies ein W2k3x86-Server mit Excel 2003 SP2. Nun habe ich neue...
11.05.2009 12:33:18
Thread-ID: 1074308
3 Beiträge
Anzeige
Kann Beiträge nicht mehr bestätigen
NoNet

Hallo @alle,
dies ist nur ein Test :
Ich kann meine Beiträge plötzlich nicht mehr absenden : Nach der Vorschau fehlt der "Absenden"-Button :-((
Gruß, NoNet
12.06.2009 21:33:11
Thread-ID: 1081185
12 Beiträge
Dropdown geht nicht mehr
stephan.schwander@wander.ch

Guten Tag zusammen,
in einer Tabelle von mir geht auf eimal der zellendropdown (Spalte G und H) nicht mehr.
Ich habe überhaupt keine Ahnung an was dies liegen kann?
Die Tabelle im Anhang ist ein Auszug einer komplexen Auswertung.
https://www.herber.de/bbs/user/62837.zip
Bes...
30.06.2009 13:26:59
Thread-ID: 1085347
4 Beiträge
Solver - Makro aufgezeichnet, lässt sich nicht abs
u_hoernchen

habe über Makro Aufzeichnen die Benutzung des Solvers aufgezeichnet. Der Code sieht dann aus wie folgt.
SolverOk SetCell:="$K$39", MaxMinVal:=3, ValueOf:="0", ByChange:="$K$16"
SolverSolve
Beim Abspielen hängt er sich dann allerdings bei "SolverOK" auf und sagt "Sub oder Function n...
20.07.2009 13:09:09
Thread-ID: 1089960
3 Beiträge
TreeView lange Einträge - Mausklick geht nicht
Alfons

Hallo,
in einem TreeView stehen einige Dateinamen die länger sind als das TreeView breit ist
und deshalb rechts nicht komplett angezeigt werden.
Bei Mausklick soll die Datei im WebBrowser1 angezeigt werden.
Das geht bei den langen Dateinamen nur dann wenn ich erst mit dem horizo...
28.07.2009 10:37:09
Thread-ID: 1091606
2 Beiträge
Datei lässt sich nicht öffnen
einfachf

Hallo Zusammen ich schreibe gerade an einem Macro.
Dazu soll aus einer bestehenden datei eine andere Datei geöffnet werden.
Leider funzt das nicht und ich weiß nicht warum.
Hier mein Code.
Dim EX As Excel.Application
Dim WB As Workbook
Dim WS As Worksheet
Set EX = Cr...
06.08.2009 12:12:10
Thread-ID: 1094009
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
10
5
3
2
5
11
3
2
1
2
3
4
24
2
5
5
9
1
1
4
7
1
5
19
7