Autor: RenanR
Procure por:
E modifique até o "end select" para:
Pronto ^^
Créditos: RenanR
Procure por:
- Código:
' Set Name Caption
Select Case .Access
E modifique até o "end select" para:
- Código:
' Set Name Caption
Select Case .Access
Case 0: .tempName = Trim(.Name)
Case ADMIN_MONITOR: .tempName = "" & Trim(.Name)
Case ADMIN_MAPPER: .tempName = "" & Trim(.Name)
Case ADMIN_DEVELOPER: .tempName = "" & Trim(.Name)
Case ADMIN_CREATOR: .tempName = "" & Trim(.Name)
End Select
Pronto ^^
Créditos: RenanR