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

Excel Zelle raufnummerieren

Frage Microsoft Microsoft Office

Mitglied: lotus

lotus (Level 1) - Jetzt verbinden

03.11.2006, aktualisiert 18.10.2012, 4612 Aufrufe, 8 Kommentare

Beim öffnen soll die Zelle eine neue Nummer erhalten.

hallo zusammen
ich möchte bei einer Zelle bei der ich z.b eine 1 drinn bei einem Neustart der Tabelle eine 2 drinn steht. Z.B Nummer 0101 sollte dann 0102 bei Neustart drinn stehen. Geht das?
Danke im Voraus und bis demnächst

mfg
lotus
Mitglied: 8644
03.11.2006 um 13:48 Uhr
Hi,

klar geht das:

01.
sub auto_open() 
02.
 Range("A1").Value  = Range("A1").Value + 1 
03.
end sub
Entscheidend ist der Name des Makros "auto_open"!

Psycho
Bitte warten ..
Mitglied: bastla
03.11.2006 um 14:15 Uhr
Hallo!

Auf jeden Fall klappt es, wenn das Makro im Code von "Diese Arbeitsmappe" liegt und den Namen "Sub Workbook_open()" trägt, also:
01.
Sub Workbook_open() 
02.
Worksheets("Tabelle1").Range("A1").Value = Worksheets("Tabelle1").Range("A1").Value + 1 
03.
End Sub
Grüße
bastla
Bitte warten ..
Mitglied: Biber
03.11.2006 um 14:21 Uhr
@psycho und @bastla
....und die Zusatzanforderung, dass Zahlen >100 eine führende "0" erhalten sollen?
Wollt ihr Euch da drücken? *g

Schönes Wochenende

Biber
Bitte warten ..
Mitglied: 8644
03.11.2006 um 14:31 Uhr
...also ich drücke mich nicht

Spalte markieren -> Rechte Maustaste -> Zellen Formatieren -> Reiter Zahlen wählen -> Benutzerdefiniert wählen -> 000# eingeben

und auch ein schönes Wochenende von mir

Psycho
Bitte warten ..
Mitglied: bastla
03.11.2006 um 15:32 Uhr
@Biber

Könnte man das nicht heimlich in der .xls per Batch (oder Patch) erledigen?

Grüße
bastla
Bitte warten ..
Mitglied: lotus
03.11.2006 um 15:46 Uhr
hallo zusammen und ein grosses Danke zuerst einmal.
Aber wo pflanze ich diesen Code hin???

Gruss
lotus
Bitte warten ..
Mitglied: bastla
03.11.2006, aktualisiert 18.10.2012
Hallo lotus!

Zunächst mit Alt-F11 den Visual Basic-Editor und dort, fall nicht ohnehin sichtbar, den Projekt-Explorer mit Strg-R aufrufen und dann:
http://www.administrator.de/forum/excel-zelle-raufnummerieren-43641.htm ...
(Codefenster per Doppelklick öffnen)

Grüße
bastla
Bitte warten ..
Mitglied: lotus
08.11.2006 um 09:02 Uhr
Bestens dankeschön an alle hat geklappt bin sehr froh danke.

Gruss
lotus
Bitte warten ..
Neuester Wissensbeitrag
Router & Routing

192.168er Adresse im öffentlichen Netz

(2)

Erfahrungsbericht von visco-c zum Thema Router & Routing ...

Ähnliche Inhalte
Microsoft Office
gelöst Excel: Einzelne Zeilen einer mehrzeiligen Zelle auslesen (3)

Frage von Booster07 zum Thema Microsoft Office ...

HTML
gelöst Zelle aus Excel in HTML-Datei einer E-Mail darstellen (3)

Frage von Sil3nz3r zum Thema HTML ...

VB for Applications
gelöst Zelle in Excel per Makro auswählen (7)

Frage von Enriqe zum Thema VB for Applications ...

Heiß diskutierte Inhalte
Zusammenarbeit
Als Administrator im Großraumbüro (29)

Frage von Dopamin85 zum Thema Zusammenarbeit ...

Exchange Server
Test-ActiveSyncConnectivity Error nach neuem Zertifikat (22)

Frage von Driphex zum Thema Exchange Server ...

Hyper-V
HYPER V und USB (16)

Frage von Hendrik2586 zum Thema Hyper-V ...

SAN, NAS, DAS
Backupserver für KMU (14)

Frage von Leo-le zum Thema SAN, NAS, DAS ...