Csatolt adattípusok azonosítása más funkciókkal

Képletek

Mindig írhat olyan képleteket, amelyek adattípusra hivatkoznak. Ha azonban egy csatolt adattípust használó cella szövegét a SZÖVEG függvény segítségével szeretné kinyerni, akkor kap egy #VALUE! hibát küld vissza.

Kerülő megoldásként használja a MEZŐÉRTÉK függvényt, és adja meg a Név mezőt a field_name argumentumhoz. Ha az alábbi példában az A1 cella részvény adattípust tartalmazott, akkor a képlet a tőzsde nevét adja vissza.

=MEZŐÉRTÉK(A1;"Név")

Ha azonban az A1 cella nem tartalmaz csatolt adattípust, akkor a MEZŐÉRTÉK függvény üres #FIELD!. Ha ki szeretné értékelni, hogy egy cella tartalmaz-e csatolt adattípust, a következő képlettel tesztelheti, hogy a MEZŐÉRTÉK függvény hibát ad-e.

=HA(PÁRATLANE(MEZŐÉRTÉK(A2;"Név"));"Ez a cella nem rendelkezik csatolt adattípussal","A cella csatolt adattípusú")

Ha a képlet hibát ad vissza, akkor a "Ez a cella nincs csatolt adattípusú" szöveget adja vissza, ellenkező esetben a következő szöveget adja vissza: "Ez a cella csatolt adattípusú".

Ha csak el szeretné tiltani a #FIELD! hibát ad vissza, a következőt használhatja:

=HAÉRZ(MEZŐÉRTÉK(A1;"Név"),"")

Amely hiba esetén üres cellát ad vissza.

Feltételes formázás

A cellákat feltételesen formázhatja attól függően, hogy csatolt adattípussal rendelkezik-e. Először ki kell választania a feltételes formázást tartalmazó cellákat, majd a Kezdőlap > Feltételes formázás > új szabály > képlet használata... A képlethez az alábbiakat kell használnia:

=NEM(PÁRATLANE(MEZŐÉRTÉK(A1;"Név")))

Ahol az A1 cella a kiértékelni kívánt tartomány legfelső cellája. Ezután alkalmazza a kívánt formátumot.

Ebben a példában, ha az A1 cella érvényes mezőnevet tartalmaz a "Név" névhez, akkor a képlet igaz értéket ad vissza, és a formázást alkalmazza a program. Ha az A1 cella nem tartalmaz csatolt adattípust, akkor a képlet a HAMIS értéket adja vissza, és nem alkalmazza a formázást. A NEM kapcsolót eltávolíthatja, ha ehelyett olyan cellákat szeretne kiemelni, amelyek nem tartalmaznak érvényes csatolt adattípusokat.

VBA

Számos olyan VBA-Visual Basic for Applications létezik, amely alapján megállapíthatja, hogy egy cella vagy tartomány csatolt adattípusokat tartalmaz-e. Az első eljárás a HasRichDataType tulajdonságot használja. 

Mindkét eljárás arra kéri, hogy jelöljön ki egy kiértékelni kívánt cellatartományt, majd adja vissza az eredményt egy üzenetmezőben.

Sub IsLinkedDataType()
    Dim c As Range
    Dim rng As Range
    Dim strResults As String
    
    Set rng = Application.InputBox("Select a range to check for linked data types", Type:=8)
    
    For Each c In rng
      '    Check if the HasRichDataType is TRUE or FALSE
        If c.HasRichDataType = True Then
        '   The cell holds a linked data type
            strResults = strResults & c.Text & " - Linked data type" & vbCrLf
        Else
            strResults = strResults & c.Text & " - Not a linked data type" & vbCrLf
        End If
    Next c

    MsgBox "Your range contains the following details" & vbCrLf & vbCrLf & strResults, vbInformation + vbOKOnly, "Results"
    
End Sub

A következő eljárás a LinkedDataTypeState tulajdonságot használja.

Sub IsLinkedDataTypeState()
    Dim c As Range
    Dim rng As Range
    Dim strResults As String
    
    Set rng = Application.InputBox("Select a range to check for linked data types", Type:=8)
    
    For Each c In rng
   '    Check if the LinkedDataTypeState is 1 (TRUE) or 0 (FALSE)
        If c.LinkedDataTypeState = 1 Then
        '   The cell holds a linked data type
            strResults = strResults & c.Text & " - Linked data type" & vbCrLf
        Else
            strResults = strResults & c.Text & " - Not a linked data type" & vbCrLf
        End If
    Next c
    
   MsgBox "Your range contains the following details" & vbCrLf & vbCrLf & strResults, vbInformation + vbOKOnly, "Results"

End Sub

Ez az utolsó kódrészlet egy felhasználó által definiált függvény (UDF), és Ön a többi képlethez Excel hivatkozik rá. Egyszerűen írja be az =fn_IsLinkedDataType(A1), ahol az A1 a kiértékelni kívánt cella.

Public Function fn_IsLinkedDataType(c As Range)
'   Function will return TRUE if a referenced cell contains a linked data type
    If c.HasRichDataType = True Then
      fn_IsLinkedDataType = "Linked data type"
    Else
        fn_IsLinkedDataType = "Not a linked data type"
    End If
End Function

A fenti példák bármelyikének használatára az Alt+F11 billentyűkombinációt lenyomva nyissa meg a Visual Basic Editor (VBE >), majd válassza a Modul beszúrása lehetőséget, és illessze be akódot a jobb oldalon megnyíló új ablakban. Ha végzett, az Alt+Q billentyűkombinációval Excel vissza a régibe. Az első két példa egyikének futtatásához a Fejlesztőeszközök> Kód> Makrók> jelölje ki a listából a futtatni kívánt makrót, majd válassza a Futtatás gombot.

További segítségre van szüksége?

Kérdéseivel mindig felkeresheti az Excel technikai közösség egyik szakértőjét, vagy segítséget kérhet a közösségekben.