Logo Hardware.com.br
Basole
Basole Geek Registrado
945 Mensagens 596 Curtidas

[Resolvido] Planilha dentro do Userform ?

#1 Por Basole 15/03/2015 - 14:45
Isso é Possivel ? Sim, é possivel !
Fala galera, eu estava pesquisando sobre a possibilidade de editar uma coluna do listView, que estou utilizando em um projeto, pois só é possivel, sem o uso de Api editar somente a 1ª coluna e sem querer, acabei encontrando o Office Web Componente by microsoft que permite isso.
Esse componente é um activex e surgiu por volta de 1999, talvez muita gente já conheça apesar de nao ter sido muito difundido aqui na terrinha, mas pra mim que sou novinho rsss.. é uma novidade, ele foi descontinuado em meados de 2006, é uma pena, pois tem quase todos os recursos da propria planilha, e voce pode inseri-lo dentro de um userform ou mesmo em uma planilha como um pop-up e outras varias possibilidades e tbem. em graficos...
Pra quem queira conheçer e testar, fiz um exemplo em um formulario que possibilita abrir qualquer arq. excel (xls, xlsm, etc), e access( mdb, e accdb).

Imagem
Antes de abrir o arquivo, baixe e instale na sua maq. o componente aqui: http://www.microsoft.com/pt-br/download/details.aspx?id=9468
Em anexo a planilha: OwcSpreadsheet com o componente e junto 1 bd-Northwind e xls-Northwind pra vc. testa-lo.
Caso, o comp. nao esteja inserido no userform, abra a cx de ferramentas, em controles adicionais e selecione a opcao "microsoft office Spreadsheet 10.0" e insira no useform, e é so testar.
abx .

Anexos

Basole
Basole Geek Registrado
945 Mensagens 596 Curtidas
#3 Por Basole
16/03/2015 - 20:44
Tudo belê e ai... Voce diz alterar a fonte de dados?
Como é só um exemplo, nao inclui este recurso, mas como disse anteriormente, este componente tem muita semelhanças, varios recursos da planilha propriamente dito, e a forma referenciar os objetos, inclusive o evento "change" e dai é incluir os comandos sql: update e [tabela], set [campo] = Target.row ou Target. value e bla bla ...:
Private Sub Spreadsheet1_SheetChange(ByVal Sh As OWC10.Worksheet, ByVal Target As OWC10.Range)


Agora para quem quer exportar e criar um novo arquivo, só habilitar a barra de ferramentas e clikar no icone "Excel" (vide imagem), e salvar como por ex. (*.xlsx)
Depois vou postar aqui outros exemplos de aplicações, deste componente:
abx.

Imagem
Click em Curtir se a resposta foi útil. boa.gif Dê retorno por favor. Se resolveu, atencao_regras.gif Altere o Titulo como [ Resolvido ] comemorando.gif
Basole
Basole Geek Registrado
945 Mensagens 596 Curtidas
#7 Por Basole
31/03/2015 - 13:02
Grande Coloniz@dor !!
Eu me aprimorei muito com o conteudo que voce postou neste forum e no seu blog. Muito obrigado.
É uma pena mesmo. Mas este componente roda no ( Win64 + Office32 ), registrando-o e criando o diretorio "C:\Program Files\Common Files\microsoft shared\Web Components\10" Regsvr32 Owc10.dll.
Já com ( Win64 + Office64 ), infelizmente não. É porisso que eu nao aconselho ninguem a usar o office 64. A maioria dos componetes nao estao + presentes, e nao aceita componentes 32.
Como eu citei no meu 1º post, alem do que mostrei até agora, este componente tem o recurso 'Chart' que possibilita voce inserir um grafico dentro do userform sem o uso de api ou imagens.
Veja este exemplo com um grafico animado dentro do from e que gira 360ºs. como se fosse um flash
abx.
Imagem

Anexos

Click em Curtir se a resposta foi útil. boa.gif Dê retorno por favor. Se resolveu, atencao_regras.gif Altere o Titulo como [ Resolvido ] comemorando.gif
© 1999-2024 Hardware.com.br. Todos os direitos reservados.
Imagem do Modal