dummie in vba dus need some help plss:(

[Verwijderd]

hey, ik weet dat het niet de bedoeling is om mijn werkjes op te knappen maar ik zou graag bij deze lijntjes van vba code die macro's zijn wat uitleg hebben. ik moet dringend iets afgeven opschool en moet dat allemaal kunnen uitleggen maar em geen idee wat het allemaal betekent. someone pls?

Visual Basic:

Sub InsertTXT()
'
' InsertTXT Macro
' De macro is opgenomen op 11/02/2003 door xxx.
'

'
    Sheets("Blad2").Select
    With ActiveSheet.QueryTables.Add(Connection:= _
        "TEXT;D:\nathje\stageopdracht\europrices\00138171.txt", _
        Destination:=Range("A1"))
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .TextFilePromptOnRefresh = False
        .TextFilePlatform = xlWindows
        .TextFileStartRow = 1
        .TextFileConsecutiveDelimiter = False
        .TextFileTabDelimiter = True
        .TextFileSemicolonDelimiter = False
        .TextFileCommaDelimiter = False
        .TextFileSpaceDelimiter = False
        .TextFileColumnDataTypes = Array(2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 4, 4, _
        2)
        .Refresh BackgroundQuery:=False
    End With
End Sub

Visual Basic:

Sub artnr()
'
' artnr Macro
' De macro is opgenomen op 11/02/2003 door xxx.
'

'

    Dim Numberofrows As Integer
    Dim i As Integer
    Sheets("blad2").Select
    If Range("B2").Value <> "" Then
        If Range("B3").Value = "" Then
            Numberofrows = 1
        Else
            Range("B2").End(xlDown).Select
            Numberofrows = Selection.Cells.Row
        End If
    End If
    Sheets("blad1").Select
    [A1] = "Artikelnummer"
    For i = 2 To Numberofrows
        Cells(i, 1).Formula = "=CONCATENATE(""C00"", Blad2!B" & i & ")"
    Next i
End Sub

[Zwelgje]

wat voor opleiding volg je

heb je daar geen studieboeken bijgekregen maw: minder chatten/msn'en en meer bikkelen met het echte werk

[F_J_K]

Je vraag is wel erg breed; ik zou zeggen: druk per woord op F1 en kijk goed naar de logica, je huiswerk voor je doen is niet de bedoeling. Je leraar vraagt ook enkel of je het uitlegt om te weten of je het zelf snapt

EN ten tweede: [rml]whoami in "[ VBA]Uitleg bij regels"[/rml] <-- als je in een forum een slotje krijgt, is het niet zo handig om meteen een nieuw topic te openen in een ander forum