PLANILHA EXCEL VB OU VB.NET?

MORDENTI 19/07/2010 15:40:52
#347756
Boa tarde,

Estou com a necessidade de criar uma planilha excel , a partir de uma rotina vb ou vb.net, que eu pudesse aplicar auto somas , colorir fundo das celular (estilo zebra). Minha dúvida é a seguinte:

Devo usar VB 6.0 ou VB.NET?

Qual dos dois teria mais facilidade em manipular, lembrando que terei que aplicar algumas auto somas e colorir as células.

E também se possível se alguém puder algum material , link ou o que for que possa me auxiliar nesta rotina, ficarei imensamente agradecido.

é a primeira vez que estou lidando com isto, e tudo o que achei no google e aqui mesmo no vbmania até ensina a criar a planilha, agora colorir as células e aplicar auto soma ainda não encontrei nada.

Estou postando a imagem apenas para facilitar o oentendimento do que eu preciso.



Obrigado,
JAMESBOND007 19/07/2010 15:46:05
#347759
estuda isso, pode te ajudar
http://www.macoratti.net/excel_vb.htm
MORDENTI 19/07/2010 16:20:53
#347764
Boa tarde ,

Valeu James , vou cair de cabeça nisto, que o meu prazo esá curtissimo.


Abraços,
JAMESBOND007 19/07/2010 16:36:13
#347770
ok agradeço eu cara. Estuda mesmo ja que vc n tem tempo e mais facil e rapido fazer no vb6 se tivesse mais tempo era melhor no vb.net (eu acho)
MORDENTI 20/07/2010 09:10:41
#347856
Bom dia de novo,


Seguinte a planilha já está em 80% pronta, realmente o macoratti é fera e auxiliou em tudo, a única coisa que está faltando agora é colorir o fundo das células e auto soma (esta para falar a verdade é de menos , pois vou calcular no programa e já lançar a soma), então só falta colorir o fundo alguém sabe como devo fazer?



Obrigado,
JAMESBOND007 20/07/2010 09:19:33
#347859
veja algum desses exemplos pode te ajudar
flex_tst.CellForeColor = vbRed

RowStyle.BackColor=VBRed


flexgrid.TextMatrix(.Rows - 1, 0) = rs(9)
                    flexgrid.TextMatrix(.Rows - 1, 1) = rs(0)
                    flexgrid.TextMatrix(.Rows - 1, 2) = rs(10)
                    flexgrid.TextMatrix(.Rows - 1, 3) = rs(49)
                    flexgrid.TextMatrix(.Rows - 1, 4) = rs(50)
                    flexgrid.TextMatrix(.Rows - 1, 5) = rs(44)
                    flexgrid.TextMatrix(.Rows - 1, 6) = rs(1)
                    flexgrid.TextMatrix(.Rows - 1, 7) = rs(2)
                    flexgrid.TextMatrix(.Rows - 1, 8) = rs(3)
                    flexgrid.TextMatrix(.Rows - 1, 9) = rs(4)
                    flexgrid.TextMatrix(.Rows - 1, 10) = rs(5)
                    flexgrid.TextMatrix(.Rows - 1, 11) = rs(6)
                    flexgrid.TextMatrix(.Rows - 1, 12) = rs(7)
                    flexgrid.TextMatrix(.Rows - 1, 13) = rs(8)
a= rs(1) - rs(2)
If a< rs(7) then
For i = flexgrid.FixedCols To flexgrid.Cols - 1
    flexgrid.Col = 12
    flexgrid.CellBackColor = &HFF&       [ô] cor alterada
Next i
end if
rs.MoveNext
JONATHANSTECKER 20/07/2010 09:19:52
#347861 Resposta escolhida

Veja se este exemplo te ajuda...
MARCOSLING 20/07/2010 09:21:00
#347862
Citação:

:
Bom dia de novo,


Seguinte a planilha já está em 80% pronta, realmente o macoratti é fera e auxiliou em tudo, a única coisa que está faltando agora é colorir o fundo das células e auto soma (esta para falar a verdade é de menos , pois vou calcular no programa e já lançar a soma), então só falta colorir o fundo alguém sabe como devo fazer?



Obrigado,



Tenho uma dica infalível!!!

No excel, grave uma macro.
Durante a gravação da macro, pinte as células e depois pare a macro.
Abra a macro que vc fez e veja o código gerado.
MORDENTI 20/07/2010 10:21:17
#347885
Bom dia ,

Obrigado gente , já tem bastante material agora vou colocar a mão na massa no fim do dia se deus quiser estarei fechando este tópico.



Obrigado a Todos,
MORDENTI 22/07/2010 09:25:24
#348096
Bom dia de novo,

O seguinte todos me ajudaram e muito, inclusive a planilha já foi até implantada, gostaria de agradecer muito a todos, pois utilizei um pouco de cada susgestão de vcs.


Vou pontuar o Jonathans pois foi ele que finalizou o projeto com o exemplo.

MUITO OBRIGADO A TODOS , TODOS MESMO!!!
Tópico encerrado , respostas não são mais permitidas
Voltar