Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

Wenn 8 in einer Zelle, dann 8 neue Zeilen zur Tabelle automatisch hinzufügen?

Frage Microsoft Microsoft Office

Mitglied: Marvin91

Marvin91 (Level 1) - Jetzt verbinden

11.06.2013 um 22:27 Uhr, 1275 Aufrufe, 2 Kommentare

Guten Abend,

dies ist mein erster Beitrag hier und möchte dementsprechend ersteinmal ein herzliches Hallo an Alle loswerden!

Hallo!

Im Rahmen meiner Arbeit sitze ich momentan vor einer Herausforderung mit meiner Exceltabelle.
Ich bin gerade dabei ein Sheet für die erleichterte Kundenübersicht zu gestalten und suche nach einer Lösung, die mir die Möglichkeit gibt, bei der die Tabelle sich automatisch um eine gewisse Anzahl an Zeilen erweitert.

Wenn ich also in eine Zelle eine 8 hineinschreibe, so soll sich diese Tabelle um 8 Zeilen automatisch mit gleicher Formatierung erweitern.

Ich würde mich sehr über eine Rückmeldung freuen und liebe Grüße,

Marvin
Mitglied: colinardo
12.06.2013, aktualisiert um 10:17 Uhr
Hallo Marvin, Willkommen im Forum!
sicher geht das, mit einem Makro kein Problem:
Erstelle eine Schaltfläche und weise dieser dieses Makro zu. Dann musst du noch die jeweiligen Namen der Objekte im Makro anpassen. In Zeile 2 den Namen der Tabelle, in Zeile 3 den Namen des Arbeitsblattes und in Zeile 4 die Zelle in der die Anzahl der hinzuzufügenden Zeilen steht.

01.
Sub Schaltfläche1_Klicken() 
02.
    tabellenName = "Kunden" 
03.
    Arbeitsblatt = "Tabelle1" 
04.
    ZelleWert = "A7" 
05.
    Dim tbl1 As ListObject 
06.
    Set tbl1 = Worksheets(Arbeitsblatt).ListObjects(tabellenName) 
07.
    anzahlZeilen = Int(Worksheets(Arbeitsblatt).Range(ZelleWert).Value) 
08.
    If anzahlZeilen > 0 Then 
09.
        For i = 1 To anzahlZeilen 
10.
            tbl1.ListRows.Add 
11.
        Next 
12.
    End If 
13.
End Sub
Falls das nicht klar genug war, hier ein Demo-Excel-Sheet zum Runterladen und Verstehen > Download

Grüße Uwe
Bitte warten ..
Mitglied: Marvin91
12.06.2013 um 22:59 Uhr
Guten Abend,

nachdem ich ein wenig rumprobiert habe, hat alles super geklappt! Danke für die nette Unterstützung!


Liebe Grüße!
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Powershell, neue Spalte einer Liste hinzufügen (3)

Frage von DanielBodensee zum Thema Batch & Shell ...

Netzwerke
Neue MACs im Netzwerk automatisch finden (4)

Frage von MedicalAd zum Thema Netzwerke ...

Microsoft Office
gelöst Excel-Werte eingeben und in neue Tabelle schreiben (9)

Frage von werner1966 zum Thema Microsoft Office ...

Neue Wissensbeiträge
Backup

Veeam-Fehler bei Bandwechsel: Timed out waiting for tape

Tipp von goRaini zum Thema Backup ...

Tipps & Tricks

Wie Hackt man sich am besten in ein Computernetzwerk ein

(29)

Erfahrungsbericht von Herbrich19 zum Thema Tipps & Tricks ...

Humor (lol)

Bester Vorschlag eines Supporttechnikers ever: APC

(15)

Erfahrungsbericht von DerWoWusste zum Thema Humor (lol) ...

Heiß diskutierte Inhalte
Internet
gelöst Mitarbeiter surft auf unerwünschter Seite - Wie damit umgehen? (52)

Frage von sabines zum Thema Internet ...

Netzwerke
LAN2LAN Verbindung sehr langsam flaschenhals gesucht (27)

Frage von PixL86 zum Thema Netzwerke ...

Router & Routing
PFsense - Netzverbindung steht, aber kein Internet vorhanden (25)

Frage von aschmid zum Thema Router & Routing ...

Windows Server
gelöst Windows 2016 Hyper-V und VHDS (19)

Frage von emeriks zum Thema Windows Server ...