VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Letzte Zelle einer Spalte mit Inhalt aus geschlossener Arbeitsmappe

Gruppe

Funktion

Bereich

ANZAHL2

Thema

Letzte Zelle einer Spalte mit Inhalt aus geschlossener Arbeitsmappe

Problem

Wie kann ich die Anzahl der Zellen mit Inhalt in einer im gleichen Verzeichnis liegenden Arbeitsmappe feststellen?

Lösung

Folgende Formel: =ANZAHL2('C:\CD0209\Beispiele\[000197v.xls]Text'!$A:$A)




StandardModule: basMain

Sub LetzteVerknuepfung()
   Dim lCell As Long
   With ActiveSheet.UsedRange
      For lCell = .Cells.Count To 1 Step -1
         If InStr(.Cells(lCell).Formula, "[") And _
            InStr(.Cells(lCell).Formula, "]") Then
            MsgBox "Verknüpfung in Zelle " & _
               .Cells(lCell).Address(False, False) & " wird gelöscht!"
            .Cells(lCell).ClearContents
            End
         End If
      Next lCell
   End With
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Funktion und ANZAHL2