Thema Datum  Von Nutzer Rating
Antwort
Rot Gespeicherten Addresse mit offset verändern
08.05.2020 11:12:25 MA
NotSolved
08.05.2020 11:31:14 Gast4664
NotSolved
08.05.2020 12:36:39 Gast23913
NotSolved
08.05.2020 14:42:22 Gast20218
NotSolved
11.05.2020 13:20:24 Gast97978
NotSolved

Ansicht des Beitrags:
Von:
MA
Datum:
08.05.2020 11:12:25
Views:
903
Rating: Antwort:
  Ja
Thema:
Gespeicherten Addresse mit offset verändern

Hallo,

aus einem anderen Forum habe ich diesen Code, der folgendes macht: Er durchsucht einen Zellbereich (b3:h30) nach dem Wert TRUE. Dieser wird durch Optionbuttons gesetzt.

Sub Test()
Dim WkSh     As Worksheet
Dim rZelle   As Range 
Dim sFundst  As String 
Set WkSh = ThisWorkbook.Worksheets("Start")
    With WkSh.Range("b3:b30")
    Set rZelle = .Find(What:=True, LookAt:=xlWhole, LookIn:=xlValues)
    If Not rZelle Is Nothing Then
        sFundst = rZelle.Address
        Do
           Debug.Print rZelle.Address
           Set rZelle = .FindNext(rZelle)
    Loop While Not rZelle Is Nothing And rZelle.Address <> sFundst
    Else
        MsgBox "Bitte einen anderen Wert wählen"
    End If
    End With
End Sub

Das funktioniert soweit gut. In Zellen a3:a30 stehen die korrespondierenden Namen. Diese Namen möchte ich jetzt in einer Variable gespeichert haben (abhängig von der Zelle aus dem "sub test"). Diesen  Wert möchte ich dann weiter verwenden.

Kann mir jemand helfen, wie ich da umgehen muss. Mit der offset methode komme ich nicht klar.

Danke vorab.

Gruß

MA


Ihre Antwort
  • 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: Name: Email:



  • 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
Rot Gespeicherten Addresse mit offset verändern
08.05.2020 11:12:25 MA
NotSolved
08.05.2020 11:31:14 Gast4664
NotSolved
08.05.2020 12:36:39 Gast23913
NotSolved
08.05.2020 14:42:22 Gast20218
NotSolved
11.05.2020 13:20:24 Gast97978
NotSolved