Uitleg van offset

[Mathijs CM]

Hoi met Math.

Ik ben bezig met behulp van anderen personen om iets te programmeren in excel, namelijk een lotto spel gebaseerd op de duitse lotto. Heb reeds een en ander ontvangen, maar ik begrijp niet wat er precie wordt bedoeld, om het toch te begrijpen dus graag even hulp.

Wie kan me kort uitleggen wat hieronderstaat in VBA betekend?

Sub CountCopyNaar()
'
    Dim myRow As Long
    Dim myStop As Long
    
    Range("L5").Select
    myStop = Range("L5").CurrentRegion.Rows.Count
    
        For myRow = 1 To myStop
            Application.StatusBar = "Processing Row " & myRow & " of " & myStop
            If ActiveCell > 0 Then
            ActiveCell.Offset(0, 2).Select
            ActiveCell.Select
            ActiveCell.FormulaR1C1 = "=COUNT(RC[-11]:RC[-2]) -RC[1] & "" Getallen"""
            ActiveCell.Offset(1, -2).Select
            End If
            
        Next myRow
        
        Application.StatusBar = False
        Columns("N:N").Copy
        Range("N1").Select
        Selection.PasteSpecial Paste:=xlValues
        Application.CutCopyMode = False
        Range("A1").Select
        
            

'

End Sub

S

ub RekenCount()
'
    Dim myRow As Long
    Dim myStop As Long
    
    Range("L5").Select
    myStop = Range("L5").CurrentRegion.Rows.Count
    For myRow = 1 To myStop
        Application.StatusBar = "Processing Row " & myRow & " of " & myStop
        If ActiveCell > 0 Then
        ActiveCell.Offset(0, 25).Select
        ActiveCell.Select
        ActiveCell.FormulaR1C1 = "=COUNT(RC[-10]:RC[-1])"
        ActiveCell.Offset(1, -25).Select
        End If
    Next myRow
    Application.StatusBar = False
    Columns("N:P").Select
    Selection.EntireColumn.Hidden = False
    Columns("AK:AK").Copy
    Range("O1").Select
    Selection.PasteSpecial Paste:=xlValues
    Application.CutCopyMode = False
    Columns("O:O").Select
    Selection.EntireColumn.Hidden = True
    Columns("AA:AK").ClearContents
    
End Sub

Met vriendelijke groeten en bij voorbaat dank

 

[mumzel]

Vraag verplaatst uit Tips en Handleidingen, die sectie is om tips en handleidingen te geven, niet te vragen

 

[Mathijs CM]

Hoi met Math

Kijk zo'n beginner ben ik dus

In ieder geval bedankt voor de moeite, maar waar vind ik de vraag dan nu terug

 

[mumzel]

Daar ben je door de link in de e-mail die je ontvangt automatisch heen gebracht

 

[OctaFish]

Als toch niet geheel nieuwe Helpbij gebruiker zou je misschien kunnen weten dat je code moet opmaken met de knop CODE (de knop met # er op). Dan is die namelijk een stuk leesbaarder. Bovendien zou het in dit geval een stuk handiger zijn als je een voorbeeldbestandje zou posten i.p.v. alleen de code; die is nogal rudimentair gemaakt, en kan een heel stuk handiger. Ik vraag me overigens af of het wel slim is om gelijk te gaan programmeren in Excel als je er helemaal niks vanaf weet. Zelf snij ik regelmatig een boterham, dus het lijkt mij fantastisch om een keer een open hart operatie te doen; snijen kan ik namelijk als de beste Wat ik bedoel is dus: misschien moet je je eerst eens verdiepen in programmeren, voordat je gelijk aan een lotto programma gaat denken...

 

[Mathijs CM]

hier mijn bestand

Bij deze