Ir para conteúdo
Fórum Script Brasil

rennanvoa2

Membros
  • Total de itens

    3
  • Registro em

  • Última visita

Sobre rennanvoa2

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

rennanvoa2's Achievements

0

Reputação

  1. Bom dia, estou precisando salvar a planilha como pdf, dentro de uma pasta Mensal. No caso, se estiver em março quando utilizar o botao, quero que o excel salve em uma pasta C:\planilhas\impressao\marco\nome do arquivo , se estiver em abril C:\planilhas\impressao\abril\nome do arquivo . A minha idéia foi a seguinte: usar uma célula para fornecer o mês com =Hoje(), depois pegaro mês com =mês(), e depois jogar no macro VBA criando uma variável com o valor desta célula, e adicionando esta célula no caminho para salvar o pdf. O código está da seguinte forma: Sub IMPRIME_FOLHA_VERDE() ' Imprime resumo Dim imprime As String imprime = Range("AD1").Value & "\" 'AD1 É A CELULA QUE CONTEM O MÊS ChDir "C:\planilhas\Confidencial" 'Abaixo é o caminho da pasta, aonde deveria usar a célula para setar o mês Caminho = ThisWorkbook.Path & "\impressoes\pedidos\" & imprime 'Abaixo é a configuração para salvar em PDF e o restante do nome do arquivo, que está correto, pois tudo funciona normalmente quando não coloco a variavel imprime em Caminho. ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ Caminho & [AA1].Value & "-" & [AB1].Value & "-" & [AC1].Value & "_" & "PEDIDO " & [Z1].Value & " - (" & [L11].Value & ")" & ".pdf", Quality:=xlQualityStandard, IncludeDocProperties:=True, _ IgnorePrintAreas:=False, OpenAfterPublish:=True _ End Sub A questão é: Se eu setar a variável desta forma e colocar ela no caminho, o Excel está me retornando erro de depuração, se eu não usar a variável, tudo roda perfeitamente, porém eu só tenho o arquivo salvo em uma única pasta, sem separação mensal.
  2. rennanvoa2

    Loop Infinito

    Bom dia, alguém sabe me dizer porque mesmo entrando com um valor inteiro ou float esse código está caindo em loop infinito ? Já bati cabeça, sei que é um código simples mas não estou conseguindo resolver. Agradeço desde já. def preço(num): while isinstance(num, numbers.Real) == False: print('Valor de Compra Pago ao Produtor Inválido.') num = input('Qual o preço de compra liquido pago ao produtor ?') Pra complementar e explicar o que eu preciso: Preciso checar se num é um número real, e se não for preciso que retorne um erro e peça para digitar novamente o número. Caso tenha uma forma mais fácil de fazer melhor ainda ! Eu estava usando uma exceção, mas estou tentando codificar esta parte sem ser por exceção é possível ?
  3. Boa tarde, tentando ajudar ... fiz da seguinte forma: #coding: utf-8 #Um dia tem 86400 segundos #Uma hora tem 3600 segundos #Um minuto tem 60 segundos # d = Dias, h = Horas, m = Minutos secs = int(input("Por favor, entre com o número de segundos que deseja converter: ")) d = 0 h = 0 m = 0 if secs >= 86400: d = int(secs / 86400) secs = secs - (d * 86400) if secs >= 3600: h = int(secs / 3600) secs = secs - (h * 3600) if secs >= 60: m = int(secs / 60) secs = secs - (m * 60) print(d, "dia(s)", h, "hora(s)", m, "minuto(s)", "e", secs, "segundo(s)") Espero ter sido assertivo e ter ajudado.
×
×
  • Criar Novo...