05. marts 2005 - 20:08Der er
2 kommentarer og 1 løsning
Hjælp til makro?
Jeg har en brugerform som indsætter en værdi i celle A2. Den fungerer fint hvis celle er tom, men hvis celle er fuld så kommer der fejlmeddelse "runtime error 424". Jeg vil gerne have at hvis cellen a2 er fuld så indsættes næste værdi i cellen nedenunder osv. Her er makro: Private Sub CommandButton1_Click() Worksheets("Opdatering").Activate Range("A2").Select If Range("A2").Value = "" Then Range("A2").Activate Else Range("A2").CurrentRegion.Select AtiveCell.Offset(Selection.Rows.Count, 0).Activate End If With ActiveCell .Value = TextBox1.Text
Der bliver investeret massivt i AI. Teknologien er mere tilgængelig end nogensinde, og ambitionerne er høje. Alligevel oplever mange virksomheder, at resultaterne udebliver.
Private Sub CommandButton1_Click() Worksheets("Opdatering").Activate Range("A2").Select
If Range("A2").Value = "" Then Range("A2").Activate Else Range("A" & CStr(Range("A65536").End(xlUp).Row) + 1).Activate End If With ActiveCell .Value = TextBox1.Text End With End Sub
Det er ikke tilfældige rækkenumre - den finder den nederste celle i kolonne A, som indeholder 'et eller andet'.... (også hvis det er et mellemrum).... så indsætter den værdien i rækken under... Det virker selvfølgelig ikke, hvis der findes værdier i f.eks. række 20 og dine værdier skal ind ovenover den række.
Synes godt om
Ny brugerNybegynder
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.
