Basole

Bom dia @Felipe Paz quem vai te ajudar precisa saber a disposicao dos dados nas planilhas. Poste um exemplo com alguns dados ficticios demonstrando o resultado desejado manualmente, para melhor entendimento.

@Hugo Leonan nao entendi, quando voce diz planilha, esta se referindo a Aba ou Pasta_de_trabalho ? Acho que o ideal seria voce postar a planilha ou um exemplo com alguns dados ficticios para melhor entendimento.

Ola Alessandra seja bem vindo a bordo. Poste sua planilha ou um exemplo com dados ficticios, para melhor entendimento de quem possa lhe ajudar.

Exemplo: Dir > LPT1

Coloque um exit sub para sair da macro: If nome = "" Then Exit Do: Exit Sub

Tente desta forma: ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ Environ("USERPROFILE") & "\Documents\" & nome & ".pdf", Quality:=xlQualityStandard _ , IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _ True

Felipe coloque um condicao se o valor da imputBox for nulo e um Exit Do para sair do Loop: Do While nome = "" nome = InputBox("Insira o nome do arquivo", "Insira o nome", vbOKCancel) If nome = "" Then Exit Do Loop

Opa tranquilo, obrigado. Sim é possivel, mas no momento, estou terminando um projeto, se puder esperar... depois mexo na sua planilha. Abx.

De nada. Pode depositar alguns dolares na minha conta... rssss Sim, existem algumas maneiras de se fazer um pop-up, umas mais simples com shapes ou msg de validação, ou mais complicadas com userform, listbox ou listview para organizar os dados, ou ainda outros componentes nao nativos do excel atual, que podem atender ao lay-out de formatacao que voce apresentou.

Sim @Luiz Aguiar_553036 segue em anexo com as alteracoes solicitadas. Consolidador-Basole-v1.zip

Desculpe mas nao entendi, quando voce fala planilhas voce se refere a Pasta_de_trabalho ou Abas ? voce podederia refazer o seu modelo inserindo o resultado manualmente e indicando quao é o resultado que deseja.

@A. E. Souza por favor, poste sua planilha ou um exemplo com alguns dados (podem ser ficticios)

Zamboni vou baixar sua planilha modelo, para analisar, mas na resposta que fiz ao tópico (link abaixo), voce já tem uma resposta? http://forum.clubedohardware.com.br/forums/topic/1142253-contagem-de-clientes/ Obrigado.

Ariel nao sei qual componente exatamente voce esta se referindo, mas caso for o "Drop-Down" na versão 2010 nao tem o recurso da opção de tam. da fonte. Somente o ComboBox activeX tem este recurso. Não sei se lhe atende, seria meio "gambiarra" usar lista de validação com um zoom, que aumenta o tamanho da tela ao cllckar na lista. Lista Validacao com zoom-Basole.zip

Luiz veja se é isso que precisa. Para selecionar + de um arquivo (pasta de trabalho), pressione a tecla [ Cltr ]. Consolidador-Basole.zip

@Luan Luiz Arthur veja se esta oção que insere a numeracao das paginas com vba lhe atende: * Pressione as teclas Alt + F8 e escolha a macro "InserirNPaginas" trabalho de amanha-Basole.zip

Poste um modelo da sua planilha única e demonstre como devem ser distribuidos os dados, e o local do nome do arquivos.

Zamboni bom dia. Segue com as alterações com distintos clientes que retiraram material no armazém pela data ! Abx. Pasta2 (1)-Basole-v1.xlsx

Zambon, pelo que eu entendi, voce quer que retorne a qtd. de clientes distintos que retiraram o material no armazem. Veja se é isso mesmo, o resultado da formula, esta na celula "Z2" A sua planilha estava com 2,8MB, porque estava com formatacao de preenchimento de cores nas colunas A,V,W,X,Y inteiras, da linha 1 ate a ultima linha (1048576), da planilha. Isso faz com que ela fique pesada. Pasta2 (1)-Basole.xlsx

Zamboni eu não entendi a questão dos volumes. Para cada etiqueta de volume voce quer imprimir 30 etiquetas Exemplo: 1/5 -> imprimir 30 etiquetas, 2/5 -> imprimir 30 etiquetas , 3/5 -> imprimir 30 etiquetas ... ............................................. Seria isso ?

Segue em anexo com as alteraçoes do intervalo que voce informou. Calendario-Basole.zip

@enazevedo, bom se você escolheu a 1ª opção. Siga os passos: Abra o modelo que escolheu, abra o editor vbe (teclas Alt+F11), do lado esquerdo, selecione o formulario "DatePickerForm" e com o botao direito, escolha "exportar arquivo" e escolha uma pasta que desejar. Siga os mesmos passos para o modulo de classe chamado "cCalendar". Abra a sua planilha e no vbe click sobre qq nome de Plan e com o botao direito escolha a opcao "importar arquivo" e importe o "DatePickerForm" e em seguida o "cCalendar".. Feito isso abra o vbe da planilha existente (aba) e cole o codigo abaixo: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Set DatePickerForm.Target = Target.Cells(1, 1) If Target.Column = 1 Then ' Se for coluna A - > altere o numero de acordo c/ sua coluna DatePickerForm.Show vbModal Cancel = True End If End Sub *altere a coluna desejada como ind. no codigo.

Henrique, para facilitar a nossa vida cole um exemplo de contrato na [Plan2] desta forma: Cada linha do contrato, cole em cada llinha da coluna [A]. Exemplo: em A1 cole -> "CLÁUSULA QUARTA: O LOCATÁRIO será responsável por todos os tributos incidentes sobre o imóvel bem como despesas" em A2 cole - > "ordinárias de condomínio, e quaisquer outras despesas que recaírem sobre o imóvel, arcando tambem com as despesas" em A3 cole -> "provenientes de sua utilização seja elas, ligação e consumo de luz, força, água e gás que serão pagas diretamente às empresas " em A4 cole -> "concessionárias dos referidos serviços." ........................ sem as aspas, e assim sucessivamente ... e deixe um espaço de linha ente uma pagina e outra do contrato.

@Zamboni_du o ideal seria voce postar um exemplo com alguns dados para facilitar a quem possa te ajudar. Segue o link com um exemplo de uma macro que fiz que é parecido com o seu caso. http://goo.gl/AK0IlR

Segue os links de 2 opções: Esta opção dè um duplo click para aparecer o calendario: http://goo.gl/iRreH8 E este outro um calendario pop-up transparente: http://www.4shared.com/zip/K0lxMUbrba/Calendario_Transparente.html