CommandButton permanente su foglio

[enrico43]

Buonasera, sto cercando di realizzare su un foglio excel un CommandButton che deve rimanere sempre visibile anche quando si scorre il foglio verso il basso o verso destra. Come in molte pagine web dove per esempio cliccandoci sopra si ritorna ad inizio pagina. Ogni aiuto è oltremodo apprezzato (suona meglio in inglese).
Grazie dell'attenzione.
Un saluto
Enrico

[ricky53]

Ciao Enrico,
inserisci il pulsante nella prima riga e dimensiona l'altezza della riga in base alle dimensioni del pulsante ed imposta le proprietà del pulsante a "Non spostare nè ridimensionare con le celle" poi blocca la prima riga (mediante Blocca riquadri) in modo che non si sposti facendo scorrere in basso le righe del foglio.

Poi occorrerà associarli del codice che fa ritornare in alto le righe spostate, per esempio

Codice: Seleziona tutto

Private Sub CommandButton1_Click()
    Application.Goto Range("A2")
End Sub


Sai come operare?
Che versione di Office utilizzi? In modo da poterti dare, se occorre, le indicazioni di come procedere nell'eseguire i passi che ti ho descritto.

[enrico43]

Grazie del riscontro.
Però io intendevo un floating tab, cioè che sia sempre a tua portata a metà foglio. Hai visto come nelle pagine web che addirittura sembra che rimbalzi.
Un saluto
Enrico

[Anthony47]

Non sono a conoscenza di un evento che possa monitorare lo scrolling dell' area visualizzata (e non significa che non esiste...).
Ipotesi:
1) metti il pulsante su una userform che apri in modalita' vbModeless
oppure
2) ti affidi all' evento SelectionChange:

Codice: Seleziona tutto

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
CommandButton21.Top = Cells(ActiveWindow.ScrollRow + 1, ActiveWindow.ScrollColumn).Top
CommandButton21.Left = Cells(ActiveWindow.ScrollRow, ActiveWindow.ScrollColumn + 1).Left
End Sub


Ciao

[ricky53]

Ciao,
leggi quanto suggerito da Anthony.


La funzionalità sulle pagine cui tu ti riferisci per me è proprio una scelta fastidiosa e non gradita.
Io preferisco i pulsanti fissi in una parte alta della pagina web (o altra funzione ma fissa in alto) ... ma qui entriamo nelle scelte di "gusto" personale e non si può dire altro che "Mi piace" o "NON mi Piace".

[enrico43]

Ritrovato. Con con ctrl+a apre un bottone, con ctrl+b apre un secondo bottone. Potete cliccare sui bottoni chè ho modificato le macro associate. Ctrl+c e ctrl+d chiude i bottoni.
Ora però devo scoprire come farlo veramente fluttuare/rimbalzare come nelle pagine web.
Vi saluto
Enrico
http://www.filedropper.com/gestionemagazzino

Su quel file ho una serie cospicua di pulsanti nell'area fissa a video (che ho cancellato nel file inviato) ed addirittura ho dovuto inserire una riga vuota per farceli entrare tutti.

[enrico43]

Avevo trovato anche questo che ti permette di inserire e far scomparire fino da 1 a 15 bottoni sempre con ctrl+a e ctrl+b che attivavano più macro, ma ho avuto paura a distribuirlo nel timore che venisse premuto il bottone sbagliato che avrebbe incasinato i dati.
Saluti
http://www.filedropper.com/multibottonisufoglio

OT The Credit for this is not Mine, I'm only the messenger OT