Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
26.02.2020 12:15:04 |
Till |
|
|
|
26.02.2020 12:30:08 |
Torsten |
|
|
|
27.02.2020 08:42:54 |
Gast17880 |
|
|
|
27.02.2020 08:47:27 |
Torsten |
|
|
Scroll Column / Row definieren |
27.02.2020 11:23:46 |
Werner |
|
|
|
27.02.2020 11:48:33 |
Till |
|
|
Von:
Werner |
Datum:
27.02.2020 11:23:46 |
Views:
557 |
Rating:
|
Antwort:
|
Thema:
Scroll Column / Row definieren |
Hallo,
ein paar Anmerkungen:
1. bei Find sollten immer zumindest die Parameter LookIn und LookAt immer angegeben werden. Bei einer "händischen" Suche speichert Excel nämlich die Suchparameter ab. Werden die dann im Code nicht explizit angegeben, dann greift dein Code auf die abgespeicherten Parameter zu und das kann dann zu Fehlern führen.
2. Range-Variable sollten am Ende des Codes besser auch wieder geleert werden.
3. Warum aus einer Range-Variablen die Zeile und die Spalte auslesen? Du hast doch eine Range-Variable, auf die du direkt zugreifen kannst.
4. Kannst du du dein ScrollUp bzw. ScrollLeft auch über die entsprechenden Offset Werte deiner Range-Variablen realisieren.
Dim finden As Range
Set finden = Columns("AV").Find(what:=Range("E12"), LookIn:=xlValues, lookat:=xlWhole)
If Not finden Is Nothing Then
Application.Goto finden.Offset(-100, -15), True
finden.Borders.Color = vbRed
Else
MsgBox "Nix gefunden"
End If
Set finden = Nothing
Gruß Werner
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
26.02.2020 12:15:04 |
Till |
|
|
|
26.02.2020 12:30:08 |
Torsten |
|
|
|
27.02.2020 08:42:54 |
Gast17880 |
|
|
|
27.02.2020 08:47:27 |
Torsten |
|
|
Scroll Column / Row definieren |
27.02.2020 11:23:46 |
Werner |
|
|
|
27.02.2020 11:48:33 |
Till |
|
|