Marcio_loko

alguém poderia ajudar?

Boa tarde, em um msg Estou aprendendo VBA, preciso colocar um botão em cada linha da minha planilha excel, ao clicar no botão quero que o mesmo apresente os dados daquela linha em uma msgBox não sei como faço para o botão pegar o valor da linha que está.... alguém pode ajudar? Procurei nos foruns e não achei.

cancelaram o relatorio, não vai mais precisar.... resolvi o problema, não o script ate...

valeu, resolvi, abracos

Bom dia Tenho uma determinada tabela, que guarda o valor anterior... ela tem dois campos: CodConta e Valor... no campo valor, ele guarda o ultimo saldo do ativo. Sempre o saldo do mes de dezembro... então o ultimo valor que tenho é referente a dezembro de 2009. O problema é que só consigo trabalhar com dados de janeiro de 2010... porque dai ele usa os valores do saldo do ativo anterior ou seja, 2009. Se eu puxar uma listagem do ano de 2009, mes a mes, ele pega o valor anterior que esta nessa tabela, o valor referente a dezembro de 2009 e ai sai tudo errado... pra corrigir isso, eu teria que ir subtraindo mes, a mes.... ate janeiro de 2009... ir subtraindo o debito....do credito,... etc.... eu precisava de uma funcao ou procedure.... para apresentar isso quando fizesse um select. meu relatorio principal aparece assim codconta jan-09 fev-09 mar-09.... ate dezembro 0001 108.99 567.99 456.99 0000056 234.88 68.99 567.00 Pra chegar nesses valores mensais, eu peguei uma outra tabela, com valores dos debitos e creditos.... (credito - debito) e cheguei nesses valores mensais... eu precisava dessa funcao ou procedure, pra pegar esse ultimo valor anterior acumulado, e ir somando ou subtraindo pra mim poder ter o valor anterior de cada mes, alguém pode me ajudar? Marcio

Boa Tarde Pessoal TO desenvolvendo um plano de contas em oracle, o´problema é que não consigo pedir pra ele subtrair o valor quando é debito (tabela clanca) e somar quando é credito.... O script segue abaixo, se alguém puder me ajudar... Seria esse campo L.Valor, tentei colocar um case junto, dizendo que se campo credito fosse diferente de nulo pra ele somar, se o campo debito for diferente de nulo pra ele subtrair... mais não funcionou. Obs: Campo Credito e Debito estao em uma tabela chamada clanca, ela tem a seguinte estrutura. data credito debito valor como eu sei quando é debito ou credito? Quando o campo credito ou debito esta preenchido... exemplo: data credito debito valor 10/09 null 123321 100,00 -- nesse caso é debito 11/08 23454 null 98.88 -- nesse caso é credito Select L.Credito As "Contas" , Sum(Decode(To_Char(L.Data, 'mm'), '01' ,Nvl(L.Valor,0) ) )-S.Valor Janeiro , Sum(Decode(To_Char(L.Data, 'mm'), '02' ,Nvl(L.Valor,0) ) )-S.Valor Fevereiro , Sum(Decode(To_Char(L.Data, 'mm'), '03' ,Nvl(L.Valor,0) ) )-S.Valor Março , Sum(Decode(To_Char(L.Data, 'mm'), '04' ,Nvl(L.Valor,0) ) )-S.Valor Abril , Sum(Decode(To_Char(L.Data, 'mm'), '05' ,Nvl(L.Valor,0) ) )-S.Valor Maio , Sum(Decode(To_Char(L.Data, 'mm'), '06' ,Nvl(L.Valor,0) ) )-S.Valor Junho , Sum(Decode(To_Char(L.Data, 'mm'), '07' ,Nvl(L.Valor,0) ) )-S.Valor Julho , Sum(Decode(To_Char(L.Data, 'mm'), '08' ,Nvl(L.Valor,0) ) )-S.Valor Agosto , Sum(Decode(To_Char(L.Data, 'mm'), '09' ,Nvl(L.Valor,0) ) )-S.Valor Setembro , Sum(Decode(To_Char(L.Data, 'mm'), '10' ,Nvl(L.Valor,0) ) )-S.Valor Outubro , Sum(Decode(To_Char(L.Data, 'mm'), '11' ,Nvl(L.Valor,0) ) )-S.Valor Novembro , Sum(Decode(To_Char(L.Data, 'mm'), '12' ,Nvl(L.Valor,0) ) )-S.Valor Dezembro , S.Valor From Clanca L Join Cconta C On L.Codcoligada = C.Codcoligada And L.credito = C.Codconta Join Csdant S On S.Codcoligada = C.Codcoligada And S.Codconta = C.Codconta And Substr(L.Credito,1,1) = '1' And To_Char(L.Data,'yy') = '09' GROUP BY L.Credito, S.Valor order by L.credito se alguém puder me ajudar, agradeco muito

acabei de conseguir... select campo,tabela.* from tabela, valeuuuu

consegui com o codigo abaixo, porem, algumas dificuldades apareceram, primeiro: 1) O Nvl não esta funcionando, trazendo valores nulls; 2) Eu tenho que somar o valor quando o campo credito estiver preenchido, e subtrair quando o campo debito estiver preenchido... exemplo: Data credito debito valor 08/02/09 12344 3456.88 10/03/09 34456 78.99 14/01/09 33445 34567 567.99 entendeu? Valeu Select L.Credito As "Contas" , Sum(Decode(To_Char(L.Data, 'mm'), '01' ,Nvl(L.Valor,0) ) ) Janeiro , Sum(Decode(To_Char(L.Data, 'mm'), '02' ,Nvl(L.Valor,0) ) ) Fevereiro , Sum(Decode(To_Char(L.Data, 'mm'), '03' ,Nvl(L.Valor,0) ) ) Março , Sum(Decode(To_Char(L.Data, 'mm'), '04' ,Nvl(L.Valor,0) ) ) Abril , Sum(Decode(To_Char(L.Data, 'mm'), '05' ,Nvl(L.Valor,0) ) ) Maio , Sum(Decode(To_Char(L.Data, 'mm'), '06' ,Nvl(L.Valor,0) ) ) Junho , Sum(Decode(To_Char(L.Data, 'mm'), '07' ,Nvl(L.Valor,0) ) ) Julho , Sum(Decode(To_Char(L.Data, 'mm'), '08' ,Nvl(L.Valor,0) ) ) Agosto , Sum(Decode(To_Char(L.Data, 'mm'), '09' ,Nvl(L.Valor,0) ) ) Setembro , Sum(Decode(To_Char(L.Data, 'mm'), '10' ,Nvl(L.Valor,0) ) ) Outubro , Sum(Decode(To_Char(L.Data, 'mm'), '11' ,Nvl(L.Valor,0) ) ) Novembro , Sum(Decode(To_Char(L.Data, 'mm'), '12' ,Nvl(L.Valor,0) ) ) Dezembro , S.Valor From Clanca L Join Cconta C On L.Codcoligada = C.Codcoligada And L.CREDITO = C.Codconta Join Csdant S On S.Codcoligada = C.Codcoligada And S.Codconta = C.Codconta And Substr(L.Credito,1,1) = '1' And To_Char(L.Data,'yy') = '09' Group By L.Credito, S.Valor order by L.credito

não, não ele da erro...

Bom dia Pessoal Preciso listar um determinado campo no oracle e depois todos, no sql server seria assim: select campovalor, * from tabela ele iria comecar com o campovalor em seguida traria todos os outros, como faco isso em oracle? Obrigado Marcio

Bom dia Necessito de uma funcao, procedure, view, de alguma coisa que faça o seguinte... o usuario entre com o ano... por exemplo: 2009 e o oracle traga pra mim todo movimento agrupado por mes, por exemplo: (acumule valor dia a dia e mostre por mes) janeiro - R$ 10.000 fevereiro - R$ 20.000 marco R4 5.000 até dezembro.... alguém pode me ajudar? Obrigado Marcio

....então.... eu já tenho uma tabela, como o campo tal..... dai queria jogar os dados dela numa tabela global.... depois apagar a tabela... origem... e voltar os dados da tabela global... com os mesmos dados, só que iniciando os codigos a partir do zero.... entendeu? Acho que agora consegui explicar o que realmente quero. -- coloquei os dados na tabela local SELECT * INTO ##GLOBAL FROM Tabela -- apaguei ela drop table tabela agora queria voltar os dados que estao na tabela global, só que iniciando do 100, depois 101, 202,, etc entendeu? Obrigado

ah sim, desculpe então... os codigos estao assim... 1, 2, 3, etc eu queria que incluisse assim... 100, 101,102, 103..... é que estou migrando os dados dessa tabela para uma nova.. e queria que os codigos dela comecassem com 100....

Boa Tarde Possuo uma tabela no banco de dados..... que tem o campo codigo...... uma sequencia de campos... exemplo.. campo: 1, 2, 3, 4, 5, etc preciso inserir os mesmo registro com uma sequencia sde codigo diferente, exemplo: como fazer isso? Marcio

então, os dados entrariam conforme coloquei no exemplo a cima... um arquivo texto.... carregar esse arquivo texto no primeiro memo, e exibir conforme arquivo texto, is´só, tranquilo, carregar no memo e exibir sem problemas...: Ele exibiria mais ou menos assim: Codigo Nome Endereco DataNascimento Valor ------------------------------------------------------------------------------------------ 01 Mario de Souza Rua Ype 1998-10-18 100.25 02 Joana Loka Rua japao 1997-01-01 152.22 03 Maria da Ponte Rua Brasil 1997-10-15 88.22 04 Vicentinho Rodrigues Rua Paulo 1996-01-01 159.11 ele teria que retornar no segundo memo assim: insert into tabela (codigo, nome, endereco, datanascimento, valor) values (01,'mario de souza','rua ype', '1998-10-18',100,25) insert into tabela (codigo, nome, endereco, datanascimento, valor) values (02,'Joana Loka','rua japao', '1998-10-18',100,25) insert into tabela (codigo, nome, endereco, datanascimento, valor) values (03,'Maria da Ponte','rua Brasil', '1998-10-18',100,25) insert into tabela (codigo, nome, endereco, datanascimento, valor) values (04,'Vicentino Rodrigues','rua Paulo', '1998-10-01',159.11) ai por diante... obrigado

Pessoal, boa noite Quando executo um select no sql server, ele me mostra o texto no seguinte formato: codigo data nome valor ---------------------------------------- 01 01-05-10 'jair' 100.00 02 02-07-10 'maria' 150.00 .... isto é salvo num arquivo texto. preciso criar um programinha em Delphi que retorne o arquivo da seguinte maneira: insert into tabela (codigo, data, nome, valor) values(01,'01-05-10','jair',100), (02,'02-07-10','maria',150.00) ... assim por diante... carregar o arquivo texto num memo sem problemas, minha dificuldade esta em pegar palavra por palavra e montar o insert... não posso usar o copy com colunas padronizadas, porque tem vez que comeca com o campo codigo..... tem vez que comeca com o campo ID, ou seja, tudo depende da consulta que o sql server trouxer, alguém pode me ajudar, gostaria que ele trouxesse isso num segundo memo... ou num arquivo texto mesmo...... alguém poderia me ajudar? ficaria muito grato. Marcio