Ir para conteúdo
Fórum Script Brasil

Tony_carlos

Membros
  • Total de itens

    44
  • Registro em

  • Última visita

Sobre Tony_carlos

Tony_carlos's Achievements

0

Reputação

  1. Amigo, obrigado pela atenção, porém fica dando erro. Nçao tem um jeito mais simples, tipo eu clico num botão e a macro vai na coluna a arruma todas as ceulas com valor ? Sub acerta_valores() Dim coluna As String Dim colunas As Integer Dim inicio As Integer Dim fim As Integer coluna = UCase(InputBox("Informe a coluna desejada", "Dados")) inicio = InputBox("Informe a linha inicial", "Dados", 0) fim = InputBox("Informe a linha final", "Dados", 0) colunas = Asc(coluna) colunas = colunas - 64 If coluna <> "" And inicio <> 0 And fim <> 0 Then For a = inicio To fim Plan1.Cells(a, colunas).Value = Plan1.Cells(a, colunas).Value * 1Next Else MsgBox "Existem campos em branco !!!" End If End Sub At
  2. Amigos , boa tarde. Preciso de ajuda urgente, ao importar dados de um outro programa para excel, na coluna c (exemplo) fica a coluna col numeros, porem ao importar esses numeros vem com erros (aquelas marquinhas verde no canto da celula) não permitindo efetuar qualquer operação, mas ao dar um f2 e em seguida Enter a celula converte para numero. preciso de uma macro que percorra a coluna em todas as celulas que contenham valor executando um f2+enter. alguém poderia me ajudar???? obrigado
  3. Bom dia amigos do forum. Gostaria que numa planilha do excel, por exemplo, na coluna X (coluna inteira), toda celula que conter a letra "L" a celula fique piscando (de possivel eu escolher a cor (tando da fonte quanto da celula) . Se alguém poder me ajudar eu agradeço obrigado
  4. Bom dia Amigos, O que eu preciso acho que não é muito dificil, porem agiliza muito. TEnho um arquivo que serve como controle de estoque (entrada e saida) o que eu preciso é o seuginte: Quanto estou digiando saida de um material o mesmo atinge uma quant, minina estipulada por mim, me retorna uma mensagem que precisa solicitar compra, ate aí beleza, só que eu precisava qua apos essa mensagem já abrisse tambem um programa (progress- reflection for unix) onde eu já solicitasse a compra genrando um numero. e alimentasse o meu arquivo o que eu não consigo é fazer abrir esse programa (via macro/ ou de outro jeito)
  5. Tony_carlos

    Userform

    Boa tarde amigos, preciso de uma ajuda, acho que essa deve ser facil para vocês. Tem um form onde uso aquele formulario (multipage) onde tem varias "abas", preciso que : ao abrir o arquivo (userform) fique selecionado sempre na primeira aba. e/ou ao final de cada cadastro (vai passando por todas as abas para cadastrar) ao clicar no botão de cadastro, volte a selecionar a primeira "aba Fico grato pela ajuda Orbrigado
  6. como faço para as linhas que estiverem ocultas no intervalo de um listbox não apareçam.
  7. Bom dia, amigos. Essa acho que não é dificil, eu tinha um script que fazia isso, mas perdi. Preciso que ao digitar uma palavra na celula a1 execute uma macro, ao digitar outra palavra execute outra macro, obs.: SOMENTE NACELULA A1,
  8. Boa tarde amigos! Gostaria de fazer o seguinte: Tenho um arquivo onde tem um form de cadastro , preciso que ao cadastrar essa informações nesse arquivo essas mesmas informações fossem para um outro arquivo. alguém pode me ajudar Obrigado
  9. Tony_carlos

    Grafico Userform

    Amigos como faço para colocar alguns gráficos no userform, de modo que se eu alterar os dados na planilha, o grafico do form altere tb, tenho um modelo comigo ond o form abri com o grafico, porem o grafico vem em formato de imagem, fico grato pela ajuda!
  10. Amigos, Quero colocar um msgbox,vbyesno em uma rotina, para que se eu clicar em sim execute uma rotina, ou se eu clicar em não execute uma outra rotina, já fiz uma vez mas não lembro mais, se alguém puder me passar um modelinho simples eu agradeço
  11. Tony_carlos

    Filtro no userform

    Segue abaixo a rotina: essa rotina não dá erro, porem ao ativar ela atraves do botão, ela executa, mas o filtro fica em branco, e se você for manualmente em personalizar vai estar correto a informação e é só cliccar em ok, faz o filtro... Private Sub CommandButton1_Click() Application.DisplayAlerts = False Application.ScreenUpdating = False If TextBox2.Text = "" Or TextBox3.Text = "" Then MsgBox ("Favor preencher os dois campos") Else Dim valor2 As String Dim valor3 As String valor2 = Format(TextBox2.Text, "dd/mm/YY") valor3 = Format(TextBox3.Text, "dd/mm/yy") Plan2.Activate Range("a2").Select valor2 = valor2 valor3 = valor3 Selection.AutoFilter Field:=5, Criteria1:=">=" & valor2, Operator:=xlAnd, Criteria2:="<=" & valor3 Range("a2").Select End If Plan2.Activate Application.Calculate Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub
  12. Tony_carlos

    ajuda com cont.se

    Paulo, na empresa que eu trabalho, o 4shared é bloqueado, passa seu e-mail que encaminho o arquivo para você..
  13. Tenho uma planilha que criei, sou iniciante e gostaria que se alguém puder dar uma olhada peço postar o e-mail que encaminho. Fiz um form com 2 txt e um botão, nos txt's eu digito uma data inicial e no outro data final, onde ao clicar no botão, é feito um filtro na coluna que tem a data. A rotina executa sem erros, porém fica tudo em branco, e na coluna do auto filtro fica com a marquinha em azul marcando que foi filtrado, quando você clica na marca azul do filtro e vai em personalizar está tudo correto conforme a rotina, e se você clica em Ok, faz o filtro. Se alguém tiver alguma dica ou quiser passar o e-mail eu encaminho a planilha Grato
  14. Tony_carlos

    ajuda com cont.se

    Paulo, eu entendi sua formula, porém eu preciso usar para varios criterios (ex. morango . banana, etc) nessa coluna das frutas onde as informções vão se intercando, na plan 2 eu coloquei um cont.se para somar esses criterios (morango banana,etc) ´so que ao filtrar por data, as linhas ocultas continuam somando, se fosse somente um criterio de soma, essa formula que você passou dava, porem são varios, ou seja a cada filtro as somas das frutas tem que mudar
  15. Tony_carlos

    ajuda com cont.se

    Paulo, bom dia. eu conheco a função subtotal, porem deixa eu tentar te explicar o que eu preciso.... tenho uma plan: Col a(fruta) col b(data) col c(cidade) morango 14/10/09 são paulo maça 20/09/09 são paulo morango 14/09/09 sãp paulo banana 20/09/09 são paulo banana 20/09/09 são paulo morango 20/09/09 são paulo usando a formula cont.se, ou seja, =cont.se(a1:a6;a10"que seria a fruta morango") daria a quantidade 3, pois no in tervalo existen 3 morango, porem essa plan tem filtro que uso por data , ou seja, ao fazer um filtro na data 14/09/09, apareceria apenas duas linha com a palavra morango, aí é que tá o problema! preciso que a formula considere apenas 2 e NÃO conte a linha do morango que foi ocultado pelo filtro, acho que dá pra entender o que eu preciso .... Fico grato pela ajuda
×
×
  • Criar Novo...