• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Kolom met laatst gevulde cel selecteren

Status
Niet open voor verdere reacties.

HansAteB

Gebruiker
Lid geworden
16 mrt 2015
Berichten
67
Zie navolgende code.
De code voor laatste regel werkt perfect.
Omgekeerd evenredig dacht ik ook de laatste kolom te kunnen selecteren, maar dat werkt niet.
Waarom niet? Wat is er onjuist aan de code?

Code:
Sub Laatste_regel()

    Let kolom = ActiveCell.Column
    Cells(ActiveSheet.Rows.Count, kolom).End(xlUp).Select
    
    
End Sub

Sub Laatste_kolom()

    Let rij = ActiveCell.Row
    Cells(ActiveSheet.Columns.Count, rij).End(xlToLeft).Select
    
End Sub
 
Je moet ze omdraaien

Code:
Sub Laatste_kolom()
    Let rij = ActiveCell.Row
    Cells(rij, ActiveSheet.Columns.Count).End(xlToLeft).Select  
End Sub

Dit is hoe cells werkt:

Cells(rij, kolom)
 
Laatst bewerkt:
Wat voor cursus ben je aan het volgen?

Let Optional. Explicit use of the Let keyword is a matter of style, but it is usually omitted.

Ik ben het nog nooit tegengekomen.
ActiveSheet is in de meeste gevallen ook overbodig.

Dus
Code:
Cells(Activecell.row, ActiveSheet.Columns.Count).End(xlToLeft).Select
is voldoende. Waarbij select beter vermeden kan worden.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan