Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
19.04.2024 13:58:02
Set Worksheet geht im O365 aber im Excel 2016 nicht
19.04.2024 13:49:38
Per Kopfdruck als pdf speichern und Mail erstellen
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1024to1028
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
1024to1028
1024to1028
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro in neuer Datei erstellen

Makro in neuer Datei erstellen
13.11.2008 10:47:23
Kurt
Guten Morgen Allerseits,
ich hoffe mir kann jemand weiterhelfen.
Problem:
Ich erstellt eine TXT Datei per Makro, nun möchte ich das
zusätzlich ein Commandbutton erstellt wird, mit folgendem Inhalt:

Private Sub CommandButton1_Click()
Dim z As Long
z = Range("a6").End(xlDown).Row
ActiveSheet.Range(Cells(6, 1), Cells(z, 27)).Select
End Sub


geht das überhaupt ?
mfg Kurt P

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro in neuer Datei erstellen
13.11.2008 12:20:00
Uduuh
Hallo,
in einer Textdatei kannst du keine Makros erstellen.
Gruß aus’m Pott
Udo

Das stimmt aber
13.11.2008 14:16:00
Kurt
Hallo Udo,
habe vergessen zu Schreiben, ich habe die Datei als xls. Datei gespeichert und dann
möchte ich ...
gr Kurt P
AW: Das stimmt aber
13.11.2008 20:57:00
Kurt
Guten Abend Udo,
ich verstehe nicht wie ich das machen muß.
Ich möchte das ein Button erstellt wird und der Inhalt des Makros da reingeschrieben
wird.

Private Sub CommandButton1_Click()
Dim z As Long
z = Range("a6").End(xlDown).Row
ActiveSheet.Range(Cells(6, 1), Cells(z, 27)).Select
End Sub




Private Sub CommandButton1_Click()

Dim z As Long

z = Range("a6").End(xlDown).Row

ActiveSheet.Range(Cells(6, 1), Cells(z, 27)).Select

End Sub


Habe das Makro mal gestartet, bleibt hier stehen:
With ThisWorkbook.VBProject.VBComponents("basMain").CodeModule
Laufzeitfehler 9
gruß kurt p

Anzeige
AW: Das stimmt aber
14.11.2008 12:32:00
Uduuh
Hallo,

Sub Makro1()
Dim btnMyNewButton As OLEObject
Dim sText As String
sText = "Private Sub NeuerButton_Click()" & vbLf
sText = sText & "Dim z As Long" & vbLf
sText = sText & "z = Cells(6,1).End(xlDown).Row" & vbLf
sText = sText & "ActiveSheet.Range(Cells(6, 1), Cells(z, 27)).Select" & vbLf
sText = sText & "End Sub"
Set btnMyNewButton = ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1")
With btnMyNewButton
.Top = 10
.Left = 10
.Width = 120
.Height = 24
.Object.Caption = "Neuer Button"
.Name = "NeuerButton"
End With
With ActiveWorkbook.VBProject.VBComponents(ActiveSheet.CodeName).CodeModule
.addfromstring sText
End With
End Sub


Gruß aus’m Pott
Udo

Anzeige
Super DANKE -)
14.11.2008 13:52:43
Kurt
Hallo Udo,
danke klappt Prima.
Schönes Wochenende,
mfg gruß kurt p

309 Forumthreads zu ähnlichen Themen

VBA Ausgabe in neue Datei
MarkusL

Hallo,
ich habe folgendes Problem:
In einer Datei befinden sich nachfolgende Datensätze
Jahr Monat Feld_1 Feld_2 Feld_3 Feld_4 Feld_5 usw.
es sollen nun per VBA nach Abfrage von Jahr und Monat ein neuer Datensatz in einer neuen Datei erzeugt werden, der allerdings nur noch die F...
08.08.2008 17:42:00
Thread-ID: 1000377
3 Beiträge
Anzeige
neue Datei erstellen und beschreiben
Toby


Hmm, wahrscheinlich für euch ein kleines Problem
habe aber im archiv nichts gefunden!
ich erstelle ein neues file und möchte dann die neue Datei mit Daten beschreiben.
aber leider schreibt er mir immer ins file in dem ich das makro starte!
ich hatte schon mol so ein Proble...
29.10.2008 13:07:00
Thread-ID: 1020251
9 Beiträge
Daten per Makro in Textdatei schreiben
Etzed

Servus,
ich habe folgendes Problem. In einer Excel Tabelle verwalte ich die Mitglieder eines Vereins mit Kontodaten für die Buchungen. Ich brauche jetzt für meine Bank eine Datei in der die Kontodaten der Mitglieder die per Bankeinzug bezahlen enthalten sind.
Diese Daten stehen bei mir...
17.11.2008 13:57:09
Thread-ID: 1025212
4 Beiträge
Anzeige
per VBA prn-Datei erstellen
Ron

hallo,
weiß jemand von euch wenn ich per makro eine Exceltabelle als prn-Datei ausdrucken will wie ich diese automatisch mit einem vorher ermittelten Namen abspeichern kann?
Danke
Gruß Ron
19.11.2008 17:22:00
Thread-ID: 1026126
5 Beiträge
Makro per VBA in Datei erstellen
Marko

Hallo zusammen,
folgendes Problem:
ich habe eine Datei mir mehreren Tabellenblätter die Formeln enthalten.
Per VBA exportiere ich die Datei und enferne dabei die vorhandenen Makros sowie ersetzte die Formeln durch Werte.
Nun würde ich abschließend in den Export ein neues Makro i...
01.07.2009 17:22:37
Thread-ID: 1085801
3 Beiträge
Tabellenblätter autom. erstellen und ausfüllen
Robert

Hallo Leute
ich habe hier eine Mappe in der ich eine Vorlage für die Prüfung von Maschinen hab.
Ich brauch pro Maschine ein Tabellenblatt und daher würde ich diese gerne automatisch erstellen wenn in der Geräteliste ein Gerät eingetragen wird.
Des Weiteren soll in den automatisch er...
07.07.2009 20:30:38
Thread-ID: 1086950
7 Beiträge
Neue Datei erstellen
Stefanglander

Hallo Forum,
ich habe eine Datei in der auf Blatt 1 im Bereich C2:C27 Namen stehen.
Ich möchte nun mit einem Makro ausgelößt durch einen CMB das für Zelle im Bereich C2:C27 die nicht leer ist eine neue Datei mit dem Namen der jeweiligen Zelle angelegt wird.
Als Vorlage soll das Bla...
02.08.2009 19:37:22
Thread-ID: 1093084
3 Beiträge
VBA beim anlegen neuer Datei mit kopieren
Stefanglander

Mal wieder ich,
Hallo Leute
ich habe ein Code von Hajo in meiner Datei eingebaut.
Es geht um den Kalender der sich beim betreten der Zelle einblendet ( ein super Teil, kann ich nur empfehlen).
Nun lege ich mittels folgendem Code eine neue Mappe an:
Sub Tab2() Dim strFile As...
16.08.2009 19:31:38
Thread-ID: 1096268
4 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton

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