Não entendi,pq colar na célula O9 se não tem nada la? Colar na 'O9' foi uma sugestão para não interferir com os dados que você colocou na amostra dis...

Olá, Renata. Experimente colar a fórmula abaixo na célula 'O9', em seguida arraste para baixo, arraste para a direita. =SE(ÉTEXTO(E9);ÍNDICE(E$9:...

Quero criar uma linha que divida em baixo do nome de cada farmácia em 2 colunas, para que eu coloque de um lado perfumaria, e do outro medicamente Se...

Se quiser experimentar uma solução que utiliza macro Instale o código abaixo em um módulo comum, assim: 1. copie o código daqui 2. a partir da planilh...

Olá, Fabio. Experimente Sub PreencheVazias() On Error Resume Next Range("A2:A" & Cells(Rows.Count, 1).Row).Speci...

em 'H8' =DESLOC($C$12;CORRESP($F$8;$C$13:$C$17);CORRESP(H5;$E$12:$H$12)+1;;) em 'H9' =DESLOC($C$12;CORRESP($F$8;$C$13:$C$17);CORRESP(I...

Olá, Marcio. Complementando a informação do Patropi, instale o código no módulo da planilha, assim: 1. copie o código do post 2. clique com o direito ...

Veja se algum dos comandos abaixo atende. ActiveWindow.Visible = False Windows("NomeDoArquivo").Visible = False

Experimente Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address <> "$B$5" Then Exit Sub On Error Resume Next ...

Sub PreencheVazias() Range("A2:A" & Cells(Rows.Count, 1).Row).SpecialCells(xlBlanks).Value = "N/A" ...

em 'J2', arraste para baixo e para a direita =ÍNDICE($C:$C;(LIN(A2)-2)*8+COLUNA(C1)) obs. algumas versões do Excel utilizam COL em lugar de COLU...

If Target.Value <> "R" And [A1] = Date Then

Sub InsereLinhasIguais() Dim nf As Long For nf = 2 To Cells(Rows.Count, 1).End(3).Row If Cells(nf, 1) > 1 Then Cells(nf, 1...

Estou querendo fazer uma sequencia numeral, onde somente a cada 16 linhas ele aumente um número em uma coluna Preciso que limite digitando o inicio e ...

... preciso de ajudar para encontrar uma fórmula para contar os números que estão formatados condicionalmente em vermelho. Na sua tabela de exemplo ...