Telefonszámunk: 1-472-0679

Az aktív cella táblázatban van-e, és melyikben? – VBA

2013-07-26 - horvimi - Megtekintések száma: 971 - Kategória: Táblázatok, Táblázatok, adattáblák, Tartományok kezelése
Hivatkozott Excel verzio: Excel 2007 Excel 2010 Excel 2013

A makrófejlesztés egyik fontos része a “Bolond állóság” (FoolProof) biztosítása. Emiatt egy igényesebb VBA kód hibaellenőrzéseket is tartalmaz.

Az egyik ilyen eset lehet, hogy ellenőrizzük, az aktív cella egy korábban már táblázattá (Lista) alakított tartományban van-e?

Íme egy erre szolgáló függvény

[vb] Function in_table() As String
Dim tname As String
tname = ""
On Error Resume Next
tname = ActiveCell.ListObject.Name
in_table = tname
End Function
[/vb]

Úgy működik, hogy ha az aktív cella benne áll egy táblázatban (listában), akkor létezik a .name tulajdonsága. Különben hibát ad, amit kezelünk.

A függvény a táblázat nevét, vagy üres stringet ad vissza.

Vélemény, hozzászólás?