Ir para conteúdo
Fórum Script Brasil

bEbEr

Membros
  • Total de itens

    502
  • Registro em

  • Última visita

Posts postados por bEbEr

  1. caro colegaa Fabiano..

    montei uma planilha e funcou.. mais sabe porque q aqui na minha original não está indo?! porque do A1 até ao F1 as células estão mescladas.. se eu deixar somente na A1 ela funciona.. mais quando vai do A1 até o F1 já não da mais certo..

    como eu faco agora!?

  2. Galera..

    to tentando utilizar a ferramenta Solver, so q estou com um pequeno problema:

    assim..

    tenho os valores 5, 10, 15, 20 e 25.

    gostaria que o Solver me achasse um valor no total de 35.. ele pegaria o terceiro valor e o quarto = 15 + 20 = 35

    até ai blza..

    o que eu queria era assim.. vamos supor q eu quisesse um valor de até 34.. ou seja.. faça todas as somas possiveis.. e aquela que for mais proxima de 34 ira me da o resultado.. so que como eu so tenho esses valores inteiros.. 1 valor de 5.. 1 valor de 10.. outro de 15.. o solver ta me trazendo valores quebrados para forma o 34.. ou seja.. ele ta mandando eu pegar 0,50 do valor de 5.. 0,20 do valor de 10.. e assim por diante.. so q esse 0,50.. 0,20.. não pode acontecer.. sempre tem q ser 1.. valor inteiro..

    como eu faco isso?

  3. galera..

    tenho uma macro onde ela monta uma planilha e tal com valores.. texto e bla bla.. e tem certas células.. exemplo A1 que precisar ter aquela quebra de pagina para que o texto apareca por inteiro.. so q não esta aparecendo..

    como posso fazer isso via macro?!

    eu fiz o seguinte:

    With Selection

    .HorizontalAlignment = xlRight

    .VerticalAlignment = xlCenter

    .WrapText = True

    .Orientation = 0

    .AddIndent = False

    .IndentLevel = 0

    .ShrinkToFit = False

    .ReadingOrder = xlContext

    .MergeCells = True

    End With

    mais não funco :S

    valeuuu

  4. meu deuss

    q complicação!!

    basta colocar o seguinte código no seu UserForm:

    Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

    If CloseMode = vbFormControlMenu Then

    MsgBox "Clique no botão SAIR para fechar a janela!"

    Cancel = True

    End If

    End Sub

    Lembrando que dai, para fechar a janela teria que criar um botão chamado SAIR e nele inserir o seguinte código:

    UserForm.Hide

    Valeuu

    ;)

  5. seguinte

    tenho um valor que é para aparecer somente no dia 01/12

    então fiz o seguinte:

    =Se(agora()="01/12";"100";"0")

    enquanto a data não for 01/12 o valor sera igual a 0 (zero), e quando chega o dia de 01/12 vai ser 100.

    como faco isso?

    falou

    já consegui

    :D

    =SE(DIA(AGORA())>=DIA(O3);SE(MÊS(AGORA())>=MÊS(O3);"s";"n");"n")

  6. galera..

    seguinte

    tenho uma listbox que tem os seguintes itens..

    TIAGO

    ANA

    como faco pra que quando eu clique em ANA ele busque na minha plan1 na coluna a o nome de ANA e pegue o valor que estiver na coluna B e jogue na minha TextBox?

    flww

  7. cara

    se você já tem vários forms, pra que declara cada um dele?!

    vai ser mais complicado pra você.

    ao invez de usar SET X = FORM1 altera o nome do FORM1 para X

    acho que vai te ajuda e não vai t complica tanto

    aproveita e c cadastra ai no site

    ;)

  8. tenta assim:

    Workbooks.OpenText FileName:= _

    "C:\Documents and Settings\Desktop\COTAHIST_D16102007.TXT", Origin:= _

    xlWindows, StartRow:=2, DataType:=xlFixedWidth, FieldInfo:=Array(Format(Array(0, _

    1),"##,##0.00"), Format(Array(2, 1), "##,##0.00"), Format(Array(10, 1) / 100, "##,##0.00") , Format(Array(12, 1), "##,##0.00"))

    qualquer coisa posta a sua planilha ai.. fica melhor pra arrumar pra você dai..

    ;)

×
×
  • Criar Novo...