Änderung der Feldinhalte von markierten DS in DatenBlattansicht

01/02/2009 - 17:37 von Christoph Sobotta | Report spam
Hallo
ein von Excel verwöhnter Mitarbeiter möchte eine markierten Reihe mit
geànderten Texten versehen.

Die von mir zum Testen verwendete Routine macht schon nicht das was sie
sollte Das Ergebnis zeigt die
Reihe 0
Spalte 0
Top Reihe richtige Angabe je nach gewàhlter Markierung
Linke Spalte bleibt immer auf 2

Private Sub btnErsetzen_Click()
Dim Status As String
'txtErsetzen.SetFocus
'status = txtErsetzen.Text

Dim lngNumRows As Long
Dim lngNumColumns As Long
Dim lngTopRow As Long
Dim lngLeftColumn As Long
Dim lngStart As Long
Dim strMsg As String

' Form is in Datasheet view.
'If Me![Blenden Unterformular].Form.CurrentView = 2 Then

' Number of rows selected.
lngNumRows = Me![Blenden Unterformular].Form.SelHeight

' Number of columns selected.
lngNumColumns = Me![Blenden Unterformular].Form.SelWidth

' Topmost row selected.
lngTopRow = Me![Blenden Unterformular].Form.SelTop

' Leftmost column selected.
lngLeftColumn = Me![Blenden Unterformular].Form.SelLeft

'lngStart = Me![Blenden Unterformular].Form.SelStart

' Display message.
strMsg = "Number of rows: " & lngNumRows & vbCrLf
strMsg = strMsg & "Number of columns: " & lngNumColumns & vbCrLf
strMsg = strMsg & "Top row: " & lngTopRow & vbCrLf
strMsg = strMsg & "Left column: " & lngLeftColumn & vbCrLf
'strMsg = strMsg & "Start: " & lngStart
MsgBox strMsg, vbInformation
'End If

Alle einschlàgigen Informationen z.b. bei Donkarl kann ich auf meinen Fall
nicht anwenden

Wenn ich die Lànge der Markierung bekommen könnte, könnte ich sie eventuell
in derTabelle beenden.
Vielen Dank für die Hilfe.



Meine Internet Adresse
http://www.pocketcutter.de
 

Lesen sie die antworten

#1 Jens Schilling
02/02/2009 - 11:32 | Warnen spam
Hallo, Christoph

Hmm, ob es wohl nur mir so geht, dass ich nicht verstehe was Du möchtest ?
Die (fehlenden) Reaktionen hier aber lassen mich vermuten, dass ich nicht
der Einzige bin, der ràtselt, was

Christoph Sobotta wrote:
ein von Excel verwöhnter Mitarbeiter möchte eine markierten Reihe mit
geànderten Texten versehen.



... Du hier sagen willst.
Was bitte ist bei Dir eine Reihe in Access ??
Selbst wenn ich nun wohlwollend vermuten würde, dass eine *Zeile* in einem
Endlosformuar gemeint sein könnte, bleibt mir unklar, was dann mit
"geànderten Texten" gemeint sein sollte.

Die von mir zum Testen verwendete Routine macht schon nicht das was
sie sollte Das Ergebnis zeigt die
Reihe 0
Spalte 0
Top Reihe richtige Angabe je nach gewàhlter Markierung
Linke Spalte bleibt immer auf 2



Lies doch mal bitte diesen (Ab-)Satz noch einmal selbst ?
Meinst Du wirklich, Jemanden der Dein Ziel nicht kennt, versteht worauf Du
hinaus willst ?

Gruss
Jens

Ähnliche fragen