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

Access Autowert jährlich automatisch mit Eins beginnen

Frage Microsoft Microsoft Office

Mitglied: bumbum

bumbum (Level 1) - Jetzt verbinden

23.10.2009, aktualisiert 09:36 Uhr, 6934 Aufrufe, 6 Kommentare

Hallo,

Ich möchte, das sich ein Feld (BestNr) wie folgt zusammen setzt: "B"+aktuelles Jahr(09)+ einen Autowert(1)

Ich habe einen Tabelle, mit den Feldern:
BestNrZus = B
BestNr= Autowert(1)
BestDatum= Speicherdatum(23.10.09)

Ich setzte mir das in einer Abfrage zusammen:

NeuBestNr: [BestNrZus] & Jahr([BestDatum])& Wenn(Länge([BestNr])=1;"0000" & [BestNr];Wenn(Länge([BestNr])=2;"000" & [BestNr];usw.))

Die BestNr sieht dann wie folgt aus: B0900001

Mein Problem:
Wenn sich das Jahr ändert soll der Autowert wieder mit 1 beginnen, d.h. B1000001

Könnt ihr mir irgendwie helfen???

LG bumbum
Mitglied: NilsErik
23.10.2009 um 15:16 Uhr
Das sollte so funktionieren:

Public Sub setzeAutowert(sTabelle As String, sSpalte As String, lNeuerWert As Long) 
     
    CurrentDb.Execute "ALTER TABLE " & sTabelle & " ALTER COLUMN " & sSpalte & " COUNTER(" & lNeuerWert& & ",1)" 
                      
End Function
Bitte warten ..
Mitglied: bumbum
23.10.2009 um 16:05 Uhr
Hallo NilsErik,

wird die Funktion dann automatisch zu Jahreswechsel nach dem ersten öffnen im neuen jahr ausgeführt?

LG bumbum
Bitte warten ..
Mitglied: NilsErik
26.10.2009 um 08:33 Uhr
Nein, die Funktion habe ich nur zu Tests genutzt.

Autowerte sind meiner Meinung nach zur Erzeugung eindeutig indentifizierbarer IDs zu nutzen, nicht um schöne Zahlen zu haben. Die kann man sich selbst erzeugen, ggf. aus den Autowerten berechnen.
Bitte warten ..
Mitglied: bumbum
26.10.2009 um 09:13 Uhr
Es bleibt doch trotzdem eine eindeutige Zahl, sie hat nur eine bestimmte Formatierung, es ist bloß der zusatz, das man ihm einem jahr zuweisen kann und sieht, dass es sich um eine Bestellung handelt und nicht um einen Lieferschein oder ähnliches.

Also kannst du mir nicht weiterhelfe, schade.....
aber trotzdem danke.

Hat jemand anderes eine Idee??

lg bumbum
Bitte warten ..
Mitglied: NilsErik
26.10.2009 um 11:58 Uhr
Wenn Du das so durchziehen möchtest, prüfst Du halt, wie der Zähler steht und setzt ihn ggf. auf (Jahr Mod 1000)*10000+1

Führende 0-er ggf. über Format anfügen bei Ausgabe oder in der Tabellendefinition.

Das B kannst Du beim Ausdruck z.B. in der Formatierung angeben oder in einem extra Feld.
Bitte warten ..
Mitglied: bumbum
26.10.2009 um 14:19 Uhr
Hey NilsErik,
danke für deine Unterstützung, ober wo soll denn "(Jahr Mod 1000)*10000+1" hin geschrieben werden? In eine Abfrage oder in einen VBA-Code, oder...?

LG bumbum
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
Automatischer Datenimport aus csv Datei in Access DB - Wo zu ändern? (2)

Frage von Mejestic12 zum Thema Microsoft Office ...

Java
Java von Beginn an lernen (1)

Frage von Stefan007 zum Thema Java ...

Datenbanken
gelöst Access 2010 Textfeld automatisch aktualisieren (2)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Xenserver
Remote Desktop Access - Automatischer Programmstart (14)

Frage von Ravelux zum Thema Xenserver ...

Neue Wissensbeiträge
Multimedia

Raspberry Pi als Digital-Signage-Computer

Information von BassFishFox zum Thema Multimedia ...

Windows Update

Novemberpatches und Nadeldrucker bereiten Kopfschmerzen

(15)

Tipp von MettGurke zum Thema Windows Update ...

Windows 10

Abhilfe für Abstürze von CDPUsersvc auf Win10 1607 und 2016 1607

(7)

Tipp von DerWoWusste zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Router & Routing
Freigabe aus anderem Netz nicht erreichbar (21)

Frage von McLion zum Thema Router & Routing ...

Windows Server
Kennwort vergessen bei Hyper vserver 2012r (20)

Frage von jensgebken zum Thema Windows Server ...

Batch & Shell
Batch Programm verhalten bei shoutdown -p (19)

Frage von Michael-ITler zum Thema Batch & Shell ...

Festplatten, SSD, Raid
Raidcontroller funktioniert nur, wenn unter Legacy-Boot gestartet wird (13)

Frage von DerWoWusste zum Thema Festplatten, SSD, Raid ...