Torna indietro   Hardware Upgrade Forum > Software > Programmazione

FRITZ!Repeater 1700 estende la rete super-veloce Wi-Fi 7
FRITZ!Repeater 1700 estende la rete super-veloce Wi-Fi 7
FRITZ!Repeater 1700 porta il Wi-Fi 7 dual-band nelle case connesse. Mette a disposizione fino a 2.880 Mbit/s su 5 GHz e 688 Mbit/s su 2,4 GHz, integrazione Mesh immediata via WPS con FRITZ!Box e funzioni smart come MLO per bassa latenza. Compatto, plug-and-play e pronto per il futuro, è la soluzione ideale per chi vuole coprire ogni angolo senza cavi o complicazioni
Fondazione Chips-IT, l'Italia alla riscossa nei chip. Il piano e la partnership EssilorLuxottica
Fondazione Chips-IT, l'Italia alla riscossa nei chip. Il piano e la partnership EssilorLuxottica
La Fondazione Chips-IT ha presentato a Pavia il piano strategico 2026-2028 per rafforzare l'ecosistema italiano dei semiconduttori. Con un focus su ricerca, design, talenti e infrastrutture, la Fondazione punta a consolidare il ruolo dell'Italia nel Chips Act europeo, sostenendo innovazione, collaborazione industriale e sovranità tecnologica.
Nutanix: innovazione, semplicità e IA al centro della strategia hybrid multicloud
Nutanix: innovazione, semplicità e IA al centro della strategia hybrid multicloud
Al Museo Alfa Romeo di Arese, Nutanix ha riunito clienti, partner ed esperti per .Next On Tour Italia e per mostrare come l’infrastruttura hybrid multicloud possa diventare il fondamento dell’innovazione, con una piattaforma capace di unificare applicazioni tradizionali, moderne architetture cloud-native e nuovi scenari basati sull’intelligenza artificiale
Tutti gli articoli Tutte le news

Vai al Forum
Rispondi
 
Strumenti
Old 18-09-2005, 12:07   #1
OrcaAssassina
Senior Member
 
Iscritto dal: Feb 2003
Messaggi: 2817
VB e EXCEL

Vorrei aprire excel premendo un pulsante sotto VB

Scrivendo le righe principali:

Dim appExcel As New Excel.Application
Dim cartExcel As Excel.Workbook
Dim foglioExcel As Excel.Worksheet
Set cartExcel = Excel.Workbooks.Add
Set foglioExcel = Excel.Worksheets.Add

Noto che scrivendo Excel. non mi compare il menù delle proprietà che posso attribure a quell'oggetto, cioè significa che non lo riconosce.

MI sapete dire come devo fare, affinche funzioni.

Modificate anche le stringhe....basti che mi si apre un nuovo file in excel

Ciao e grazieeeeeee
__________________
AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER
OrcaAssassina è offline   Rispondi citando il messaggio o parte di esso
Old 18-09-2005, 23:33   #2
OrcaAssassina
Senior Member
 
Iscritto dal: Feb 2003
Messaggi: 2817
VB6

Voglio aprire un foglio nuovo in EXCEL premendo un pulsante in VB.

Mi dite la sintassi corretta.


Ho scaricato un file dove c'era tale esempi, ho copiato le stringhe sotto il mio pulsante, quando lo premo mi dice:

ERRORE DI COMPILAZIONE:
TIPO DEFINITO DALL'UTENTE NON DEFINITO

Altra prova che ho fatto, sul file di esempio che ho scaricato:

Prendendo in considerazione questa stringa

Dim appExcel As New Excel.Application

Ed eliminando .Application

rimane

Dim appExcel As New Excel

mettendo il . mi apre il menù a tendina con le proprietà.

Facendo uguale sul mio progetto, questo non funziona, cioè mettendo il . non si apre nessun menù a tendina, come se Excel non fosse riconosciuto.

In poche parole, come faccio ad aprire un file EXCEL premendo un pulsante????

Ciao e grazieeeeeeeeee
__________________
AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER
OrcaAssassina è offline   Rispondi citando il messaggio o parte di esso
Old 21-09-2005, 13:28   #3
OrcaAssassina
Senior Member
 
Iscritto dal: Feb 2003
Messaggi: 2817
OK

Ok ci sono riuscito

Adesso la parte più difficile:

Fino adesso ho fatto la parte dell'intestazione.
Ora devo fare il corpo.

Nel corpo devo inserire i dati uno di seguito all'altro.

Quindi ho gia creato un recordset e devo distruire i dati per righe:

Range("A13").Select
ActiveCell.FormulaR1C1 = "[Rigo]"
Range("B13").Select
ActiveCell.FormulaR1C1 = "[Servizio]"
Range("C1313").Select
ActiveCell.FormulaR1C1 = "[UT]"
Range("E13:F13").Select
ActiveCell.FormulaR1C1 = "[CS]"
Range("G13:H13").Select
ActiveCell.FormulaR1C1 = "[NL]"
Range("I13:J13").Select
ActiveCell.FormulaR1C1 = "[NS]"

Cpme faccio a fargli compilare una riga poi andare sotto prendere il secondo record, inserire i valori nel foglio e cosi via per tutto il recordset????

Ciao e grazieeeeeeeeee
__________________
AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER
OrcaAssassina è offline   Rispondi citando il messaggio o parte di esso
Old 22-09-2005, 00:51   #4
Piccolo Lord
Bannato
 
L'Avatar di Piccolo Lord
 
Iscritto dal: Sep 2005
Città: Walthamstow, London
Messaggi: 138
Puoi indirizzare le celle con Cells(numeroriga, numerocolonna).
Piccolo Lord è offline   Rispondi citando il messaggio o parte di esso
 Rispondi


FRITZ!Repeater 1700 estende la rete super-veloce Wi-Fi 7 FRITZ!Repeater 1700 estende la rete super-veloce...
Fondazione Chips-IT, l'Italia alla riscossa nei chip. Il piano e la partnership EssilorLuxottica Fondazione Chips-IT, l'Italia alla riscossa nei ...
Nutanix: innovazione, semplicità e IA al centro della strategia hybrid multicloud Nutanix: innovazione, semplicità e IA al ...
Lenovo LOQ 15i Gen 10 (15IRX10) alla prova: il notebook gaming 'budget' che non ti aspetti Lenovo LOQ 15i Gen 10 (15IRX10) alla prova: il n...
Due mesi di Battlefield 6: dalla campagna al battle royale, è l'FPS che stavamo aspettando Due mesi di Battlefield 6: dalla campagna al bat...
Intel prova macchinari 'cinesi' per i ch...
Windows 11, problemi con l'aggiornamento...
Bitcoin, sono passati 15 anni dalla 'sco...
DAZN lancia il Pass Giornata per la Seri...
Street Fighter: Paramount e Capcom pubbl...
Corsa finale all'ultimo sconto: Amazon p...
Per Tom Cruise niente film nello spazio:...
Invincible VS, dopo fumetti e serie TV a...
Il robot umanoide che voleva fare il mag...
Galaxy Tab S10 Lite a 299€ su Amazon: ta...
Prezzi Google Pixel in calo su Amazon: P...
Prezzi in picchiata sull'hardware PC: GP...
Aspyr ha rinviato Deus Ex Remastered: pr...
Amazon Haul, prezzi mini senza precedent...
Linate, sequestrate oltre 20.000 carte c...
Chromium
GPU-Z
OCCT
LibreOffice Portable
Opera One Portable
Opera One 106
CCleaner Portable
CCleaner Standard
Cpu-Z
Driver NVIDIA GeForce 546.65 WHQL
SmartFTP
Trillian
Google Chrome Portable
Google Chrome 120
VirtualBox
Tutti gli articoli Tutte le news Tutti i download

Strumenti

Regole
Non Puoi aprire nuove discussioni
Non Puoi rispondere ai messaggi
Non Puoi allegare file
Non Puoi modificare i tuoi messaggi

Il codice vB è On
Le Faccine sono On
Il codice [IMG] è On
Il codice HTML è Off
Vai al Forum


Tutti gli orari sono GMT +1. Ora sono le: 20:47.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Served by www3v