Avatar billede jath08ac Forsker
03. november 2017 - 22:10 Der er 1 løsning

Tæl sidste første tomme række VBA kode

Hej,

Jeg har problemer med nedenstående kode.

Mit data ligger i en tabel, som starter fra række 10.

Når jeg køre koden, så får jeg at vide at RowCountGantMåned er Emty

Håber en kan hjælpe med at se hvad problemet er.


RowCountGantMåned = Worksheets("GantKortMåned").Range("A10").CurrentRegion.Rows.Count
                With Worksheets("GantKortMåned").Range("A10")
                   
                  .Offset(RowCountGantMåned, 0).Value = txtBox1.Value
                  .Offset(RowCountGantMåned, 1).Value = txtBox2.Value
                  .Offset(RowCountGantMåned, 2).Value = txtBox3.Value

              End With
Avatar billede Dan Elgaard Ekspert
04. november 2017 - 08:52 #1
Prøv med denne:

RowCountGantMåned = Worksheets("GantKortMåned").Range("A" & Rows.Count).End(xlUp).Row + 1

Og, så lad være med, at benytte .OffSet

With Worksheets("GantKortMåned")
    .Cells(RowCountGantMåned,1) =  txtBox1.Value
    .Cells(RowCountGantMåned,2) =  txtBox2.Value
    .Cells(RowCountGantMåned,3) =  txtBox3.Value
End With
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester