Bottone link

Versione Completa   Stampa   Cerca   Utenti   Iscriviti     Condividi : FacebookTwitter
Pagine: [1], 2
tarik792
00domenica 19 febbraio 2017 15:00
Salve a tutti , vi volevo chiedere come faccio a fare un bottone che mi porti ad un sito internet. Stavo facendo così ho creato il bottone in vba e solo che poi non riesco a mettergli il comando. ( ripeto sono alle prime armi con questo linguaggio vba)
federico460
00domenica 19 febbraio 2017 15:49
ciao
esempio

Shell ("C:\Programmi\Internet Explorer\iexplore.exe http://pincopallo.it"), vbNormalFocus



chiaramente al click del pulsante

il comando è Shell
tarik792
00domenica 19 febbraio 2017 17:11
Grazie per avermi risposto però se metto il comando così

Private Sub CommandButton1_Click()
Shell ("C:\Programmi\Internet Explorer\iexplore.exe http://google.it"), vbNormalFocus
End Sub

se clicco sul bottone non mi esce niente
Thestoat
00domenica 19 febbraio 2017 17:21
Ciao, il codice è sbagliato, il private button chiama la Macro, il codice giusto è così:

Private Sub CommandButton1_Click()
Call Foglio1.Link
End Sub

Sub Link()
Shell ("C:\Programmi\Internet Explorer\iexplore.exe http://google.it"), vbNormalFocus
End Sub



Call Foglio1.Link <-- qui devi mettere il nome del tuo foglio.
federico460
00domenica 19 febbraio 2017 17:23
ciao
se sei collegato ad internet si altrimenti no [SM=x423026]

se usi un pulsante ActiveX metti il codice

Private Sub CommandButton1_Click()
Shell
End Sub



sul foglio

se usi un pulsante controllo modulo
va su un modulo

Sub Pulsante1_Click()
Shell
End Sub
federico460
00domenica 19 febbraio 2017 17:24
Thes
ma per favore

l'hai provato?


https://www.dropbox.com/s/fdr8tc3naryn1ap/peulsanti%20con%20collegamento%20a%20sito.xlsm?dl=0

Thestoat
00domenica 19 febbraio 2017 17:27
Ciao fede, certo che l'ho provata, ecco il file:

tarik792
00domenica 19 febbraio 2017 17:27
Re:
Thestoat, 19/02/2017 17.21:

Ciao, il codice è sbagliato, il private button chiama la Macro, il codice giusto è così:

Private Sub CommandButton1_Click()
Call Foglio1.Link
End Sub

Sub Link()
Shell ("C:\Programmi\Internet Explorer\iexplore.exe http://google.it"), vbNormalFocus
End Sub



Call Foglio1.Link <-- qui devi mettere il nome del tuo foglio.



grazie di cuore allora il mio foglio si chiama foglio1 dove lo metto di preciso?
Thestoat
00domenica 19 febbraio 2017 17:30
Re: Re:
tarik792, 19/02/2017 17.27:



grazie di cuore allora il mio foglio si chiama foglio1 dove lo metto di preciso?




Nel foglio 1
federico460
00domenica 19 febbraio 2017 17:31
Ciao
thes

non il tuo
codice ma quello che ho scritto io
funziona benissimo
tarik792
00domenica 19 febbraio 2017 17:32
non so dove sbaglio mi da errore di compilazione
federico460
00domenica 19 febbraio 2017 17:35
[SM=g27828] [SM=g27828] [SM=g27828]

il file di Thes lo devi aggiornare

lui usa Mozzilla ( se si scrive così) [SM=g27823]
Thestoat
00domenica 19 febbraio 2017 17:39
Non è che hai cambiato il nome al bottone??

Fede ho provato funziona, non so perchè non funzioni a lui.
federico460
00domenica 19 febbraio 2017 17:42
thes

dovrebbe dire quale dei due file non funziona
ma quasi certamente è un problema di numero pulsante
o shapes che ha nel suo file
come hai detto tu

tarik

carica uno stralcio del tuo file con il bottone

tarik792
00domenica 19 febbraio 2017 17:43
Ora ti dico quello che ho fatto, allora apro excel e mi seleziono sulla cella 1 nel Foglio1 e clicco ALT+f11

Poi clicco su inserisci Userform dove creo il pulsante di comando
gli clicco due volte sopra e mi esce questo

Private Sub CommandButton1_Click()

End Sub

dove io vado a sostituire con quello che mi hai dato tu
federico460
00domenica 19 febbraio 2017 17:46
metti in mezzo
questo

Shell ("C:\Programmi\Internet Explorer\iexplore.exe http://pincopallo.it"), vbNormalFocus



e vedi che funziona
tarik792
00domenica 19 febbraio 2017 17:47
Ho provato anche quello di federico ma non si apre il sito
federico460
00domenica 19 febbraio 2017 17:49
prova
il file
clicca sul pulsante 3
e poi sul pulsante che trovi sul form
Thestoat
00domenica 19 febbraio 2017 17:50
Vai in sviluppo, clicca su Modalità progettazione, poi clicca sul bottone, nel box bianco a sinistra della barra delle formule esce una scritta, qual'è la scritta che esce?

Forse è meglio che inserisci il file.
federico460
10domenica 19 febbraio 2017 17:52
[SM=x423038]
non è che sei scollegato [SM=g27828] [SM=g27827] [SM=g27828] [SM=g27827]

scherzo
tarik792
00domenica 19 febbraio 2017 17:53
Re:
federico460, 19/02/2017 17.49:

prova
il file
clicca sul pulsante 3
e poi sul pulsante che trovi sul form



Non mi apre niente


Thestoat
00domenica 19 febbraio 2017 17:55
Che sistema operativo usi?
federico460
00domenica 19 febbraio 2017 17:55
come non ti apre niente [SM=g27833] [SM=g27833] [SM=g27833]

non si apre il form
o il sito

thes
a te si apre?

( non sapevo pincopallo aprisse un sito)
tarik792
00domenica 19 febbraio 2017 18:01
Re:
Thestoat, 19/02/2017 17.50:

Vai in sviluppo, clicca su Modalità progettazione, poi clicca sul bottone, nel box bianco a sinistra della barra delle formule esce una scritta, qual'è la scritta che esce?

Forse è meglio che inserisci il file.



Come?


federico460
00domenica 19 febbraio 2017 18:05
tarik
il foglio è bianco [SM=g27833]

cosa ne facciamo
devi farlo tu con pulsanti e tutto

così vediamo perché non funziona
tarik792
00domenica 19 febbraio 2017 18:06
Allora mi sa che faccio un errore di base proprio perchè il pulsante non mi rimane sul foglio cavolo. riprovo
federico460
00domenica 19 febbraio 2017 18:17
non ti arrabbiare ma ti scrivo la procedura

scheda SVILUPPO

INSERISCI

dal menu a tendina

CONTROLLO DI MODULO

segli pulsante ( primo a sinistra )

clicca sulla cella dove lo vuoi

ti si apre un form

clicca su NUOVO

ti esce

Sub Pulsante1_Click()

End Sub

trasformalo in


Sub Pulsante1_Click()
Shell ("C:\Programmi\Internet Explorer\iexplore.exe http://google.it"), vbNormalFocus
End Sub



fatto

per il pulsante ActiveX è leggermente diverso

una volta scelto
cliccaci con il dx sopra e segli
VISUALIZZA CODICE

ti esce

Private Sub CommandButton1_Click()

End Sub

e scrivi il solito Shell ecc...

poi sulla barra del foglio clicca su modalità progettazione
per disattivarla.

fatto
tarik792
00domenica 19 febbraio 2017 18:17
Ragazzi in primis grazie , sto perdendo le speranze, non capisco perchè il bottone non mi compare sul foglio1
tarik792
00domenica 19 febbraio 2017 18:20
Re:
trovato ma lo stesso non mi apre il sito
federico460
00domenica 19 febbraio 2017 18:23
Visualizzare la scheda sviluppo in un'applicazione di Office

1.Fare clic sulla scheda File.


2.Fare clic su Opzioni.


3.Fare clic su Personalizzazione barra multifunzione.


4.In Personalizzazione della barra multifunzione e Schede principali selezionare la casella di controllo Sviluppo.


prova a cliccare sulla figura blu
Questa è la versione 'lo-fi' del Forum Per visualizzare la versione completa clicca qui
Tutti gli orari sono GMT+01:00. Adesso sono le 15:13.
Copyright © 2000-2024 FFZ srl - www.freeforumzone.com