Jeg har en problemstilling jeg godt kunne tænke mig hjælp til:
Jeg har brug for at kontrollere om der er tomme celler i en kolonne. Det kunne være en kolonne hvor der skal indtastes en dato, efter endt indtastning vil det gerne kontrolleres om der i alle række er tastet en dato.
Jyske Bank er rykket ind i Glaskuben på Kalvebod Brygge, et markant byggeri i hjertet af København. Knap 1.000 arbejder her, heraf 200 i IT, med nye rammer for samarbejde, innovation og udvikling.
Jeg bruger lige pt. denne løsning som ikke er holdbar nok.
For i = 1 To 1000
If Cells(i + 7, 1) = "" Then If Cells(1 + 7, 8) <> "" Then Range(Cells(i + 7, 1), Cells(i + 7, 8)).Select a = MsgBox("Dato feltet i linje nr. " & i + 7 & " Er blankt!, Skal linjen slettes ", vbYesNo) If a = vbYes Then Cells(i + 7, 1).EntireRow.Delete End If
End If End If
Next i 10 Call bilag_fejl
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.