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

Tabellendatensätze über UserForm bearbeiten, wie?

Frage Microsoft Microsoft Office

Mitglied: DerParte

DerParte (Level 1) - Jetzt verbinden

03.12.2007, aktualisiert 06.12.2007, 5566 Aufrufe, 1 Kommentar

Moin zusammen,

ich möchte Datensätze über eine User Form bearbeiten. Wie ich die Datensätze einlesen kann in die Userform weiß ich bereits:

Private Sub UserForm_Initialize()
' Tabelle und Startzelle auswählen
Sheets("Vereinsmitglieder").Select
[a2].Select
' Produktliste einlesen
Do While ActiveCell.Value <> ""
' Inhalt der aktiven Zelle einfügen
Me.LB_Bearbeiten.AddItem ActiveCell.Value
' Nächste Zeile ansteuern
ActiveCell.Offset(1, 0).Select
Loop
End Sub

Nun soll beim betätigen des Button die Änderungen übernommen werden, eventuell noch eine MSGBOX abfrage ob man das wirklich tun möchte.

1a54a61c4cc74a4c04710c93bd95a625-grafik1 - Klicke auf das Bild, um es zu vergrößern
Mitglied: DerParte
06.12.2007 um 09:46 Uhr
Hat keiner eine Idee?

Die Userform hat folgenden Quellcode:

Private Sub CmdB_Schließen_Click()
Mitglied_Bearbeiten.Hide
End Sub
Private Sub LB_MitgliedBearbeiten_Click()
Dim auswahl As Integer
auswahl = Me.LB_MitgliedBearbeiten.ListIndex
With Me
.TB_Name = [a2].Offset(auswahl, 1)
.TB_Straße = [a2].Offset(auswahl, 2)
.TB_PLZ = [a2].Offset(auswahl, 3)
.TB_Ort = [a2].Offset(auswahl, 4)
.TB_AnmeldeDatum = [a2].Offset(auswahl, 5)
.TB_Kaution = [a2].Offset(auswahl, 6)
.TB_Beitrag = [a2].Offset(auswahl, 7)
End With
End Sub

Private Sub UserForm_Initialize()
' Tabelle und Startzelle auswählen
Sheets("Vereinsmitglieder").Select
[a2].Select
' Produktliste einlesen
Do While ActiveCell.Value <> ""
' Inhalt der aktiven Zelle einfügen
Me.LB_MitgliedBearbeiten.AddItem ActiveCell.Value
' Nächste Zeile ansteuern
ActiveCell.Offset(1, 0).Select
Loop
End Sub
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Backup
Acronis Recoverystick bearbeiten (7)

Frage von Hendrik2586 zum Thema Backup ...

Microsoft Office
gelöst Excel Marko "private sub" bearbeiten (2)

Frage von ArnoNymous zum Thema Microsoft Office ...

Batch & Shell
gelöst Batch : alle Dateien eines Ordners bearbeiten (1)

Frage von deguonkel zum Thema Batch & Shell ...

Heiß diskutierte Inhalte
Viren und Trojaner
gelöst Wie werde ich den Mist "fanli90" wieder los? (18)

Frage von Taumel zum Thema Viren und Trojaner ...

Switche und Hubs
LAG zwischen Cisco SG300 und Dlink DGS1100 herstellen - wie? (16)

Frage von White-Rabbit2 zum Thema Switche und Hubs ...

CPU, RAM, Mainboards
Hardware Fragen (12)

Frage von xaver-2 zum Thema CPU, RAM, Mainboards ...

Exchange Server
gelöst Exchange 2013 - Kontakte aus CSV importieren (9)

Frage von hesper zum Thema Exchange Server ...