Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VBA Neue Arbeitsmappe erstellen

Frage Microsoft Microsoft Office

Mitglied: Philippe-M

Philippe-M (Level 1) - Jetzt verbinden

23.09.2009 um 13:02 Uhr, 7634 Aufrufe, 2 Kommentare

Hallo zusammen,

ich möchte eine neue Arbeitsmappe erstellen. Die aktuelle heißt zum Beispiel "aktuelle". Ich möchte jeden Datensatz, der 2007 enthält in eine neue Arbeitsmappe schreiben.

Ich kann das einfach mit der aufzeichnungsfunktion machen (Filter etc.). Ich habe aber dann das Problem, dass diese Variante nur einmal geht. danach heißt das Register nicht mehr Tabelle2 sondern Tabelle3...

Wie kann ich das soweit machen? Ich muss wahrscheinlich der aktuellen Tabelle eine variable zuweisen oder?




Sub Makro5()


Selection.AutoFilter
Range("AG7").Select
Selection.AutoFilter Field:=30, Criteria1:="2007"
ActiveWindow.ScrollColumn = 16
ActiveWindow.ScrollColumn = 15
ActiveWindow.ScrollColumn = 14
ActiveWindow.ScrollColumn = 13
ActiveWindow.ScrollColumn = 11
ActiveWindow.ScrollColumn = 10
ActiveWindow.ScrollColumn = 9
ActiveWindow.ScrollColumn = 7
ActiveWindow.ScrollColumn = 6
ActiveWindow.ScrollColumn = 5
ActiveWindow.ScrollColumn = 4
ActiveWindow.ScrollColumn = 3
ActiveWindow.ScrollColumn = 2
ActiveWindow.ScrollColumn = 1
Rows("8:9").Select
Selection.Copy
Sheets("ASDaten").Select
Sheets.Add
Sheets("Tabelle1").Select
Application.CutCopyMode = False
Sheets("Tabelle1").Move After:=Sheets(2)
Sheets("Tabelle1").Select
Sheets("Tabelle1").Name = "2007"
Range("A1").Select
Sheets("ASDaten").Select
Selection.Copy
Sheets("2007").Select
ActiveSheet.Paste
End Sub




Vielen dank im voraus
Mitglied: mischn1980
23.09.2009 um 13:27 Uhr
Hi,

also mit folgendem Code erstellt man eine neue Arbeitsmappe:

Application.Sheets.InNewworkbook = 1
Workbooks.Add

Gruss

Michael
Bitte warten ..
Mitglied: GammaKappa
23.09.2009 um 13:40 Uhr
Ich glaube, er will keine neue Arbeitsmappe, sondern eine neue Tabelle in einer Arbeitsmappe erstellen.

Bau dein Makro mal mit diesem Code um:
Sheets.Add Before:=Sheets(1) 
Worksheets(1).Name = Date
Dieser Code erstellt die eine neue Tabelle an Position eins und gibt ihr als Namen das Datum von heute.
Bitte warten ..
Ähnliche Inhalte
XML
gelöst Kein automatisches Backup über Button VBA (2)

Frage von Knuefi zum Thema XML ...

Basic
gelöst Excel VBA - speichern, senden, Pfad angeben (3)

Frage von next01de zum Thema Basic ...

Windows Netzwerk
gelöst Domäne neu, Gruppenrichtlinien erstellen: das Rad neu erfinden? (5)

Frage von DocuSnap-Dude zum Thema Windows Netzwerk ...

Netzwerkgrundlagen
gelöst Kann ich mit einem Switch ein neues Netzwerk erstellen? (7)

Frage von sandisk1 zum Thema Netzwerkgrundlagen ...

Neue Wissensbeiträge
Windows 10

Erneutes Starten eines Programmes mit Admin-Rechten

Tipp von Estefania zum Thema Windows 10 ...

Ubuntu

Ubuntu 17.10 steht zum Download bereit

Information von Frank zum Thema Ubuntu ...

Datenschutz

Autofahrer-Pranger - Bewertungsportal illegal

(8)

Information von BassFishFox zum Thema Datenschutz ...

Windows 10

Neues Win10 Funktionsupdate verbuggt RemoteApp

(3)

Information von thomasreischer zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Router & Routing
Allnet - VDSL2 Modem - SFP (mini-GBIC) (20)

Frage von Dobby zum Thema Router & Routing ...

Voice over IP
DeutschlandLAN IP Voice Data M Premium, Erfahrung mit Faxgeräte? (17)

Frage von liquidbase zum Thema Voice over IP ...

TK-Netze & Geräte
TK-Anlage VoIP - DECT Erweiterung (16)

Frage von Lynkon zum Thema TK-Netze & Geräte ...