Planilhando :: O Maior portal de Excel do Brasil - Tópicos Recentes

Contagem de gols e viradas

fraterharley — Sat, 11 Jul 2026 14:36:55 +0000

Na coluna B, temos o número do jogo em questão. Nas colunas T e X as equipes que jogaram e nas colunas U e W, o placar do jogo. Na coluna DD, temos os autores dos gols. Na coluna DI, temos a qual equipe pertence o autor do gol (ADV para adversário e BRA para Brasil). Preciso que nas colunas DM e DN, sejam calculados o placar momentâneo da partida. Exemplo, ADV fez um gol, então DM2 marca 0 e DN2 marca 1. BRA fez um gol, então DM3 passa a ser 1 e DN3 continua com um. Preciso também que na coluna DO seja calculada se houve virada a favor na partida, ou seja, se o BRA começou perdendo mas saiu vencedor no final. E se houve virada sofrida, ou seja, se o BRA começou marcando e o ADV saiu vencedor. O resultado deve ser mostrado após o último gol de quem venceu, conforme mostra na planilha.

VIRADA2.xlsx

exemplo

THIAGO TEMPONI — Sat, 13 Jun 2026 16:05:40 +0000

Não estou conseguindo abrir os posts exemplos como eu faço ?

Enviar arquivo PDF para o whatsap

gerald — Sat, 30 May 2026 02:33:24 +0000

Boa noite

Tenho um formulario que imprime um arquivo em PDF e quero enviar para uma cliente pelo o whatsap usando o vbae possivel ou tem uma outra maneira?

Deixar um determinado valor no script trazer uma informação de acordo com a informação que esta nas celulas de uma coluna

cmbruno — Sun, 24 May 2026 15:32:15 +0000

Bom dia,

Pessoal preciso de uma ajuda se possivel.

Tenho a macro sub parte2 e preciso deixar o script abaixo que tem o valor 9 em que esse 9 atualize de acordo com a informação da coluna E a partir da linha 3.

Cada linha que vai ser percorrida pode ser um numero diferente e gostaria de deixar essa informação automática

session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell/shellcont/shell").selectItem (" 9"), "&Hierarchy"
session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell/shellcont/shell").ensureVisibleHorizontalItem " 9", "&Hierarchy"
session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell/shellcont/shell").clickLink " 9", "&Hierarchy"

Sub Parte2()

If Not IsObject(Appl) Then
Set SapGuiAuto = GetObject("SAPGUI")
Set Appl = SapGuiAuto.GetScriptingEngine
End If
If Not IsObject(Connection) Then
Set Connection = Appl.Children(0)
End If
If Not IsObject(session) Then
Set session = Connection.Children(0)
End If
If IsObject(WScript) Then
WScript.ConnectObject session, "on"
WScript.ConnectObject Appl, "on"
End If

Windows("Consultar Status Nota Fiscal.xlsm").Activate
Sheets("Planilha3").Select

session.findById("wnd").maximize
session.findById("wnd/tbar/okcd").Text = "/NEDOC_COCKPIT "
session.findById("wnd").sendVKey 0

session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell/shellcont/shell").selectItem (" 9"), "&Hierarchy"
session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell/shellcont/shell").ensureVisibleHorizontalItem " 9", "&Hierarchy"
session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell/shellcont/shell").clickLink " 9", "&Hierarchy"

session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell/shellcont/shell").sapEvent "Frame0", "sapbu_cl= &sapse_cl= &sapin_cl=A1F1I1NAME:LAST_DAYSsapENTER&A1F1I1=120", "sapevent:A1F1"
session.findById("wnd/usr/btnBUTTON_1").press
session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell").setCurrentCell -1, "NFENUM"
session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell").selectColumn "NFENUM"
session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell").pressToolbarButton "&MB_FILTER"
session.findById("wnd/usr/ssub%_SUBSCREEN_FREESEL:SAPLSSEL:1105/ctxt%%DYN001-LOW").Text = "000031945"
session.findById("wnd/usr/ssub%_SUBSCREEN_FREESEL:SAPLSSEL:1105/ctxt%%DYN001-LOW").caretPosition = 9
session.findById("wnd").sendVKey 0
session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell").currentCellColumn = ""
session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell").selectedRows = "0"
session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell").pressContextButton "GOTO"
session.findById("wnd/usr/cntlC_CONTAINER/shellcont/shell/shellcont/shell/shellcont/shell").selectMenuItem "DISPLAY_SOURCE"

TABELA

MCSilveira — Thu, 21 May 2026 15:35:13 +0000

Alguém sabe uma forma de proteger uma coluna em uma tabela (formatar como tabela) sem utilização de VBA, de forma que o usuário não consiga alterar o seu conteúdo? Já tentei utilizar a questão de proteção, mas com a proteção não é possível criar uma nova linha da tabela.

Atualizar uma planilha com base em outra planilha de forma automatica

LuizSouza — Wed, 20 May 2026 18:55:05 +0000

Boa Tarde!
Preciso automatizar uma planilha "PLAN1" (formatada como tabela) que possui cabeçalhos fixos e os dados devem ser alocados verticalmente, buscando as informações de outra planilha "PLAN2" que possui várias abas, cada aba refere-se à um projeto diferente, com uma pequena tabela em cada aba que possui as mesmas colunas e as informações preenchidas. O esquema é que a PLAN1 busque na PLAN2 as informações e se preencha automaticamente, para que o PowerBI leia esta PLAN1 e se atualize.

Agrupar dados diferentes com base na color da célula

Guilherme22 — Sat, 25 Apr 2026 19:32:28 +0000

Eu preciso de uma maneira de agrupar as células (com seus dados) em colunas, de forma que elas permaneçam na mesma linha, mas mudem de coluna de acordo com suas cores. O arquivo em anexo deixa mais óbvio. Obrigado! EDIT: Não consigo anexar o arquivo, alguém da uma força aí por favor.