De fleste virksomheder har efterhånden bevist, at AI virker.
Pilotprojekter leverer resultater. Medarbejdere bruger generative AI-værktøjer. Nye use cases dukker op på tværs af organisationen.
Her er lidt kode, der tæller antallet af celler, der ikke er tomme i a-kolonnen:
Sub IkkeTomme() Worksheets("ark1").Range("a:a").Name = "Minyrange" antal = Application.CountA(Worksheets("ark1").Range("myrange")) Debug.Print antal End Sub
Et par andre ideer: Denne giver antallet indtil første tomme celle Antal = Range("A1").End(xlDown).Row
Denne giver antallet (rækkenummeret) på nederste udfyldte celle i kolonnen, dvs at der tillades tomme celle ind imellem data Antal= Range("A65536").End(xlUp).Row
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.