EXCELer Tudo sobre EXCEL em Português

Num newsgroup foi colocada a seguinte questão: "Quando peço os sub-totais de uma folha, só fica em bold o campo da 1ª coluna. O que eu pretendo é que toda a linha do sub-total fique em bold automaticamente". Para que os valores correspondentes aos subtotais fiquem automaticamente em BOLD, quando usamos subtotais para analisar uma lista, podemos utilizar a Formatação …

Por vezes, podemos ter a necessidade e utilizar, num Userform, um TextBox com comprimento fixo e com Multiline e WordWrap. Vejamos o exemplo: Quando se inicia a escrita, a altura do TextBox aumenta automaticamente até à altura previamente definida: Grava para a célula A1: Para invocar o Userform que contem o TextBox, criamos um CommandButton na grelha: O Código para …

Se pretendermos que uma determinada célula sequencie sempre que quisermos abrir um workbook, podemos utilizar o seguinte código de McGimpsey, com a adaptação no código de abertura do workbook, uma vez que se incluiu no número sequencial o ano, no formato "nn/aa", com a porção de código & "/" & Right(Date, 2) O código da Função NextSeqNumber(): Public Function NextSeqNumber(Optional …

Um dia destes, foi-me perguntado, por mail, qual a fórmula que permite contar as ocorrências de um caracter numa célula. Exemplo: Quantos caracteres "." tem na célula A1 cujo conteúdo é 01.02.03.04? A célula A1 neste caso é do tipo texto. O resultado deveria ser 3. Utilizando as Funções LEN() e SUBSTITUTE(), obtém-se o resultado desejado: A fórmula em B1: …

Se quisermos saber o nome do utilizador e a data e hora do acesso a determinado workbook, como no exemplo: Obteremos o seguinte resultado: O Código do exemplo: Sub Auto_Open()    Dim Ops(1 To 5) As String    Dim Msg As String     Ops(1) = Day(Date)    Ops(2) = Month(Date)    Ops(3) = Year(Date)    Ops(4) = Hour(Time)    Ops(5) = Minute(Time)     Msg = Ops(3) & "-" & Ops(2) & "-" & Ops(1) …

Se pretendermos efectuar um filtro, utilizando dados provenientes de determinadas células, como no exemplo: podemos utilizar um pouco de Código VBA: '—————————————————————' Procedure : Filtra_Click' DateTime  : 24-04-2006 19:07' Author    : JRod' Purpose   : Efectua um filtro por data anterior ou posterior'           : (célula I3) à data inscrita na célula I5'           : Se I5 for vazio, desfaz o filtro'—————————————————————'Private Sub Filtra_Click()     Dim …

Se pretendermos contar quantas células existem num determinado Range e que contenham valores apresentadas numa determinada cor, ou se quisermos somar os valores com a mesma cor contidos nesse mesmo Range, como no exemplo seguinte: , podemos criar duas User Defined Functions (UDF). Por outro lado, para sabermos a que número corresponde cada uma das 56 cores da palette de …