rodtessi

Patropi, bom dia! Muito obrigado pela ajuda. Eu não consegui transferir sua fórmula para minha planilha. Estou anexando para que possa entender melhor e verificar, porque dependendo da ordem que ficam as quantidades de moedas, a fórmula da erro. Se puder ajudar novamente, agradeço. As abas Proposta(onde são selecionadas as moedas) e a aba custos(onde preciso da fórmula) marquei em amarelo. PROPOSTA IMPORTAÇÃO AÉREA.rar

Boa tarde! Por gentileza, se alguém puder, gostaria de ajuda para resolver a questão abaixo. Tenho uma planilha com 02 colunas. 1) A primeira identifica a quantidade de vezes que uma determinada moeda é selecionada em outra aba. 2) A segunda mostra qual a moeda selecionada. coluna 1 coluna 2 0 USD 0 EUR 0 GBP 1 BRL 0 CHF 2 CAD 2 AUD 0 JPY Preciso que mostra em 3 células diferentes, quais as 3 moedas mais selecionadas. Tentei a função procv e maior pra puxar a que mais aparece, mais quando os valores são iguais mostra moeda repetida. Poderiam me ajudar, por favor? No caso ficaria assim: cél1: CAD cél2: AUD cél3: BRL

Obrigado Diego, mas não consegui fazer essa formula. Coloco anexo a planilha, se puder me ajudar... Pasta.rar

Boa tarde! Preciso de ajuda, por favor. Tenho uma planilha com uma tabela que verifica qual item aparece mais vezes. Nesse caso, é sobre moedas. Na primeira linha, tenho vários tipos de moedas e na linha de baixo a quantidade de vezes que ele aparece em um intervalo. Nesse caso, preciso retornar o valor correspondente na linha para a célula que apareça mais vezes. Ex. Moedas USD=5 BRL=1 GBP=3 Preciso que o excel retorne a palavra USD, por aparecer mais vezes, nesse caso 5x. Se alguém puder ajudar, agradeço.

Bom dia a todos! Tenho uma planilha com 2 abas. Preciso imprimir essas 2 abas em pdf e anexar no mesmo e-mail. Detalhe: o primeiro arquivo pdf precisa ser renomeado utilizando as células contidas nessa 1ª aba. Tenho o código abaixo que emite o pdf e anexa o e-mail. Poderiam me ajudar a colocar o outro anexo, por favor? Não é preciso renomear o 2º anexo com células. Um nome simple é o suficiente. ======================================================================= Sub PDFEMAIL() Dim Nome As String Dim SDate As String Dim MyLocal As String Dim endereco As String MyLocal = "G:\INTERNACIONAL\SI -MODELO DE INSTRUÇÃO DE EMBARQUE\SI MARITIMA FCL 2016\PDF\" Shipper = Range("T12").Value Cnee = Range("AB12").Value PO = Range("AB6").Value Origem = Range("T14").Value Destino = Range("AB14").Value Agent = Range("AB10").Value SDate = Now endereco = "" T = Range("E288").Value T1 = Range("E290").Value T2 = Range("E291").Value T3 = Range("E292").Value T4 = Range("E294").Value T5 = Range("E295").Value T6 = Range("E297").Value T7 = Range("E299").Value pula = Chr(10) & Chr(13) If MsgBox("voce quer salvar este arquivo agora ?", vbYesNo) = vbYes Then Nome_Arq = MyLocal & "SI FCL --- " & Cnee & " --- " & Shipper & " --- " & Agent & " --- " & PO & " --- " & Day(Now) & "-" & Month(Now) & "-" & " - " & Year(Now) & ".pdf" FileSaveName = Application.GetSaveAsFilename(Nome_Arq, fileFilter:="PDF Files (*.pdf), *.pdf") Sheets("SEA FCL - SHIPPING INSTRUCTIONS").ExportAsFixedFormat Filename:=Nome_Arq, Type:=xlTypePDF, Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _ True Application.DisplayAlerts = False Else Application.DisplayAlerts = False End If Set myActiveSheet = CreateObject("Outlook.Application") Set objMail = myActiveSheet.CreateItem(olMailItem) Set myAttachments = objMail.Attachments With objMail .To = endereco .Subject = "IMPORTAÇÃO MARÍTIMA FCL --- " & Nome & " --- " & Cnee & " --- " & Shipper & " --- " & Agent & " --- " & PO & " --- " & Day(Now) & "-" & Month(Now) & Year(Now) .Body = T _ & pula & T1 _ & pula & T2 _ & pula & T3 _ & pula & T4 _ & pula & T5 _ & pula & T6 _ & pula & T7 myAttachments.Add Nome_Arq .Display End With End Sub =============================================================