Resposta para Q3
Abra o VBA e crie uma macro:
Option Explicit
Function ZIsApostrophe(rng As Range) As Boolean
ZIsApostrophe = rng.PrefixCharacter = "'"
End Function
Use a função personalizada ZIsApostrophe()
para verificar se uma célula começa com '.
Por exemplo, digite ZIsApostrophe(A3)
para verificar se a célula A3 inicia com '. Ele retornará o valor TRUE ou FALSE como resultado.
Crédito: José Augusto
Respostas para 1, 2 e 4
1a) = SE (FORMULATEXT (A1)="= HOJE ()", 1,0)
1b) = SE (ESQUERDO (FORMULATEXT (A1), 5)="= TEMPO", 1,0)
1c) [edite a solução 1b]
2) = SE (AND (CÓDIGO (MID (FORMULATEXT (A1), 2,1)) > = 65, CÓDIGO (MID (FORMULATEXT (A1), 2,1)) < = 90), 1 , 0)
[você pode consultar os detalhes do código () no arquivo de ajuda. (:]
4) = IF (AND (código (direita (FORMULATEXT (A1), 1)) > = 48, CODE (direita (FORMULATEXT (A1), 1)) < = 57), 1,0)
Crédito: p. phidot