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

Excel Zelle raufnummerieren

Frage Microsoft Microsoft Office

Mitglied: lotus

lotus (Level 1) - Jetzt verbinden

03.11.2006, aktualisiert 18.10.2012, 4635 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 ..
Ähnliche Inhalte
Microsoft Office
gelöst Excel Zelle dynamisch einer Zeile zuordnen (3)

Frage von sammy65 zum Thema Microsoft Office ...

VB for Applications
gelöst Zelle in Excel per Klick einfärben (5)

Frage von C.Mue83 zum Thema VB for Applications ...

Microsoft Office
VBA Code zum Kopieren von einzelnen Zellen in Excel (3)

Frage von SebastianL zum Thema Microsoft Office ...

Neue Wissensbeiträge
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

(6)

Information von thomasreischer zum Thema Windows 10 ...

Microsoft

Die neuen RSAT-Tools für Win10 1709 sind da

(2)

Information von DerWoWusste zum Thema Microsoft ...

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 ...

Windows 10
Windows 10 Ordnerfreigabe (14)

Frage von Xaero1982 zum Thema Windows 10 ...