|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Senior Member
Iscritto dal: Aug 2000
Messaggi: 1209
|
[VB] Scrivere codice su Excel
E' possibile scrivere del codice su "Excel XP" per creare un report da stampare, sensa dovere utilizzare il Crystal Report ???
esempio: 1) mi creo una struttura grafica di linee come voglio io 2) creo delle Query per estrarre i dati dal database MySQL o Access i quali dati li memorizzo in delle variabili 3) stampo le variabili con i dati sotto le celle di Excel nella posizione che dico io 4) stampo l'intero documento popolato di dati ed ecco che ho creato un report domande: 1) come faccio per inserire le query in modo che all'apertura del foglio Excel vangano eseguite??? 2) come faccio per visualizzare il valore delle variabili nei campi giusti??? 3) si puo' con VB.NET ??? |
|
|
|
|
|
#2 |
|
Senior Member
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
|
Con VBA... Visual Basic for Application... E' un linguaggio molto simile al VB6...
Strumenti -> Macro e a quel punto scegli l'editor... |
|
|
|
|
|
#3 |
|
Senior Member
Iscritto dal: Aug 2000
Messaggi: 1209
|
Ho trovato questo http://ennius.interfree.it/ ma non si puo' grstire un Database MySQL o Acccess..............
|
|
|
|
|
|
#4 |
|
Senior Member
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
|
Con VBA puoi gestire tutti i DB che ti pare visto che puoi fare query tramite ADO...
Con Office dovresti avere anche l'Help per VBA... |
|
|
|
|
|
#5 |
|
Senior Member
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
|
Ho trovato nell'help di VBA questa apertura di un DB tramite ODBC (quindi può essere di qualsiasi tipo basta che abbia un DSN di sistema) :
databaseName = "Northwind" queryString = _ "SELECT * FROM product.dbf WHERE (product.ON_ORDER<>0)" chan = SQLOpen("DSN=" & databaseName) SQLExecQuery chan, queryString Set output = Worksheets("Sheet1").Range("A1") SQLRetrieve chan, output, , , True SQLClose chan |
|
|
|
|
|
#6 |
|
Senior Member
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
|
Comunque nell'Help di Excel XP (io ho 2000) puoi sicuramente trovare il modo di aprire un DB con ADO...
|
|
|
|
|
|
#7 |
|
Senior Member
Iscritto dal: Aug 2000
Messaggi: 1209
|
Ho visto ho capito come fare , anche se devo un po tradurre per VBA io conosco solamente VB.NET.
una sola cosa se la sai al volo, come posso fare per avviare una Sub all'apertura del mio documento Excel, non so come arrivare all'evento "Load" del foglio di Excel, all'avvio cosi richiamerei la Sub con le Query................. |
|
|
|
|
|
#8 |
|
Senior Member
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
|
E' la prima volta che metto mano su VBA, ma sembra che funzioni :
In thisWorkBook metti : Private Sub Workbook_Open() 'Solo per fare un esempio myNum = Application.InputBox("Enter a number") End Sub |
|
|
|
|
|
#9 |
|
Senior Member
Iscritto dal: Aug 2000
Messaggi: 1209
|
FUNZIONA!!!!
.....ma che testa che ho.......... sai cosa avevo inserito io ???........ Private Sub Workbook_Load() MsgBox("Tutto OK!") End Sub .......e si,... devo proprio fare una bella traduzione da VB.NET a VBA....... io ho gia aperto la guida dell'editor VBA del mio Office XP, e ho cercato come fare per visualizzare un valore sotto una cella, ma non trovo nulla, tu dato la tua esperienza ormai nota, non hai idea di come visualizzare ad esempio la variabile " MyVar = "Ciao!" " dentro la cella " B:5 " e quindi in " B:5 " si vedra' " Ciao! " all'apertura del documento Excel. se risolvo questo prometto che non ti domando piu' nulla a riguardo.... grazie mille......!!! |
|
|
|
|
|
#10 |
|
Senior Member
Iscritto dal: Aug 2000
Messaggi: 1209
|
Altrimenti un altra soluzione e dirmi come fai i report per la stampa di documenti tipo "Fogli di fattura" con VB6......
io non sono ancora riuscito ad imparare l'uso del Crystal Report , non trovo uno straccio di guida da seguire, tu ne conosci una??? oppure come si fa per stampare con codice sensa il Crystal Report includendo linee per la formattazione corretta di un "Documento di fattura" ??? |
|
|
|
|
|
#11 |
|
Senior Member
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
|
Riguardo al Crystal Report...non ne ho idea
Per l'altra cosa : Codice:
Private Sub Workbook_Open()
myNum = Application.InputBox("Enter a number")
Worksheets(1).Activate
Worksheets(1).Cells(2, 10).Value = myNum
'L'indice 2 corrisponde alla riga, 10 alla colonna (lettera J)
End Sub
|
|
|
|
|
|
#12 |
|
Senior Member
Iscritto dal: Aug 2000
Messaggi: 1209
|
Ti ringrazio molto........
Ma tu non fai i report di stampa??? |
|
|
|
|
|
#13 | |
|
Senior Member
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
|
Quote:
Dicamo che il mio settore è reti e web... Comunque mi sono trovato a fare qualche report di stampa in VC++, ma mi sono programmato la stampa pixel per pixel... |
|
|
|
|
|
|
#14 |
|
Senior Member
Iscritto dal: Nov 2001
Messaggi: 421
|
Inoltre, se non conosci bene i comandi VB per operare sulle celle di Excel puoi utilizzare il generatore di macro di Excel che non fa altro che registrare in VB tutto quello che fai sul foglio Excel.
Ciao
__________________
q8200@2800 - 4*2Gb DDR2 800 -1 sata 500Gb - Mast.DVD - LG 25" 3d - ATI 4670 - Stamp. Canon MP110 - Kit 5.1 della Cambridge... che favola! |
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 14:43.



















