Hvordan forhindre tomme eller manglende oppføringer i celler i Excel?

Hvis du oppretter en tabell i området A1:B10 i et regneark og vil sikre at ingen tomme celler er igjen i dette området, kan du implementere en løsning som automatisk viser en melding hvis en tom oppføring oppdages under redigering. Følg denne trinnvise veiledningen for å forhindre tomme eller manglende oppføringer i det angitte tabellområdet.

Forhindre tomme eller manglende oppføringer i celler ved å bruke VBA-kode

Forhindre tomme eller manglende oppføringer i celler ved å bruke VBA-kode

Området A1:B10 er utpekt for bordet ditt, med A1 og B1 som tabelloverskrifter, som vist på skjermbildet nedenfor. Følg trinnene som er skissert for å forhindre tomme eller manglende oppføringer innenfor området A2:B10 mens du fyller ut tabellen.

1. I regnearket der du vil forhindre tomme oppføringer i et bestemt område, høyreklikker du arkfanen og klikker Vis kode fra høyreklikkmenyen.

2. I Microsoft Visual Basic for Applications vindu, kopier og lim inn VBA-koden nedenfor i kodevinduet. Se skjermbilde:

VBA-kode: Forhindre tomme eller manglende oppføringer i en rekke celler

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count <> 1 Then Exit Sub
    Dim isect As Range
    On Error Resume Next
    Set isect = Application.Intersect(Target, Range("A2:B10"))
    
    If Not (isect Is Nothing) Then
        If Target.Column = 1 Then
            If Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0 Then
                MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
                Target.ClearContents
            End If
        Else
            If (Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0) Or (Len(Target.Value) > 0 And Len(Target.Offset(0, -1).Value) = 0) Then
                MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
                Target.ClearContents
            End If
        
        End If
    End If
End Sub

Merknader: I VBA-koden, A2: B10 er celleområdet du ikke vil ha tomme celler inni. Vennligst endre rekkevidden etter behov.

Fra nå av, hvis du hopper over en tom celle og fyller ut neste celle i det angitte området, a Kutools for Excel dialogboksen vises som vist nedenfor.

Relaterte artikler:

• Hvordan forhindre at data legges inn i bestemte celler i et regneark i Excel?
• Hvordan forhindre valg av flere regneark i Excel?
• Hvordan forhindre at et bestemt regneark slettes i Excel?
• Hvordan forhindre at spesifikt celleinnhold slettes i Excel?