| | Post: 105 | Registrato il: 01/06/2016
| Città: PISA | Età: 64 | Utente Junior | 2003 | | OFFLINE | |
|
  16/12/2022 09:24 | |
Buongiorno, ho una domanda a cui non riesco a trovare soluzione:
E' possibile disattivare la X che sta in alto a destra che serve per chiudere la finestra del foglio?
Disattivare la X che chiude Excel è stato abbastanza facile ma non riesco a capire come disattivare quella della finestra.
...e se c'è modo, cosa potrebbe comportare?
Chiaramente mi servirebbe anche l'istruzione per riattivarla (magari prima di uscire, probabilmente).
Grazie.
PS - allego screenshot esemplificativo.
EcoBand |
|
| | Post: 4.865 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
| 16/12/2022 20:06 | |
Io sul mio Excel menù Home vedo questo
Tu a quale X ti riferisci? [Modificato da alfrimpa 16/12/2022 20:07]
Alfredo |
| | Post: 1.296 | Registrato il: 16/08/2015
| Città: CORDENONS | Età: 67 | Utente Veteran | Excel 2016-32bit Win11 | | OFFLINE |
|
| 16/12/2022 23:01 | |
Excel 2K3. Per ottenere lo stesso risultato ora trovi solo il Chiudi dal menu File ma chiude tutti i fogli. [Modificato da rollis13 16/12/2022 23:04]
______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto) |
| | Post: 105 | Registrato il: 01/06/2016
| Città: PISA | Età: 64 | Utente Junior | 2003 | | OFFLINE | |
|
| 17/12/2022 12:32 | |
mi riferisco alla X che chiude la finestra del foglio visualizzato, non alla X rossa in alto nell'angolo a destra che chiude tutto Excel...
Praticamente la X più piccola poco sotto alla X rossa di chiusura totale.
(se vedi lo screenshot che avevo allegato, è la X contrassegnata con il cerchio rosso) [Modificato da elioeco 17/12/2022 12:34] EcoBand |
| | Post: 397 | Registrato il: 02/04/2018
| Città: PESCARA | Età: 75 | Utente Senior | EXCEL 2016 - SPREAD32 | | OFFLINE |
|
| 17/12/2022 14:06 | |
nel mio Excel 2007 compare forse la X che dici tu (non quella di chiusura Excel)
se io la clicco scompare qualsiasi cosa tranne il fatto che Excel resta aperto senza neppure Nuovo Foglio
se poi il tuo 2003 sia diverso non saprei
ciao
LEO
https://t.me/LordBrum |
| | Post: 106 | Registrato il: 01/06/2016
| Città: PISA | Età: 64 | Utente Junior | 2003 | | OFFLINE | |
|
| 19/12/2022 07:39 | |
mi riferisco proprio a quella X che chiude la finestra e non tutto excel:
la mia domanda è la sequente: esiste un comando VBA che disattiva quella X?
Mi servirebbe perchè alcuni colleghi (non solo non masticano bene excel, ma sono anche un pò "smanettoni distratti") magari involontariamente ci vanno col mouse sopra, chiudono e non sanno poi come rimediare...
[Modificato da elioeco 19/12/2022 07:41] EcoBand |
| | Post: 4.871 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
| 19/12/2022 12:37 | |
elioeco, 19/12/2022 07:39:
mi riferisco proprio a quella X che chiude la finestra e non tutto excel:
la mia domanda è la sequente: esiste un comando VBA che disattiva quella X?
Se si riuscisse a capire quale è questa "X" forse qualcosa si potrebbe dire.
Io ne vedo solo una ed è quella che chiude Excel.
I fogli non si chiudono autonomamente. [Modificato da alfrimpa 19/12/2022 12:38]
Alfredo |
| | Post: 107 | Registrato il: 01/06/2016
| Città: PISA | Età: 64 | Utente Junior | 2003 | | OFFLINE | |
|
| 20/12/2022 08:17 | |
alfrimpa, 19/12/2022 12:37:
Se si riuscisse a capire quale è questa "X" forse qualcosa si potrebbe dire.
Io ne vedo solo una ed è quella che chiude Excel.
I fogli non si chiudono autonomamente.
...probabilmente, visto che usi excel 2013, hai solo quella che chiude tutto. Su excel 2003 (ma anche su excel 2207) ti assicuro che c'è EcoBand |
| | Post: 1.043 | Registrato il: 24/06/2015
| Città: CATANIA | Età: 80 | Utente Veteran | Excel2019 | | OFFLINE |
|
| 20/12/2022 09:23 | |
Salve a tutti
Probabilmente si riferisce a quella che ho indicato con la freccia (si fa per dire...) rossa.
https://www.dropbox.com/s/rvb3kn5hvxup0rh/DoppiaX.JPG?dl=0
Che io sappia non si può fare.
Ciao,
Mario [Modificato da Marius44 20/12/2022 09:25] |
| | Post: 108 | Registrato il: 01/06/2016
| Città: PISA | Età: 64 | Utente Junior | 2003 | | OFFLINE | |
|
| 20/12/2022 09:59 | |
Marius44, 20/12/2022 09:23:
Salve a tutti
Probabilmente si riferisce a quella che ho indicato con la freccia (si fa per dire...) rossa.
https://www.dropbox.com/s/rvb3kn5hvxup0rh/DoppiaX.JPG?dl=0
Che io sappia non si può fare.
Ciao,
Mario
infatti: è esattamente quella!
...spero in una smentita (sul fatto che non si possa fare), altrimenti con alcuni colleghi sarà un bel caos.
Attenderò fiducioso.
EcoBand |
| | Post: 1.303 | Registrato il: 16/08/2015
| Città: CORDENONS | Età: 67 | Utente Veteran | Excel 2016-32bit Win11 | | OFFLINE |
|
| 22/12/2022 00:31 | |
Ma ora mi sorge spontanea una curiosità, se si blocca la X di chiusura di Excel e se poi si blocca la x di chiusura dei singoli file aperti, come si procede se l'utilizzatore vuole abbandonare la sessione di lavoro ? col Termina Applicazione dal Task Manager ?
______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto) |
| | Post: 1.044 | Registrato il: 24/06/2015
| Città: CATANIA | Età: 80 | Utente Veteran | Excel2019 | | OFFLINE |
|
| 22/12/2022 06:48 | |
Ciao
@rollis13
Voglio sperare, caro Rolando, che abbia previsto un pulsante d'uscita col relativo codice.
Ciao,
Mario |
| | Post: 1.304 | Registrato il: 16/08/2015
| Città: CORDENONS | Età: 67 | Utente Veteran | Excel 2016-32bit Win11 | | OFFLINE |
|
| 22/12/2022 08:39 | |
Ah, è vero. Mi sa che ad una certa ora bisogna sempre essere già a dormire😴.
______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto) |
| | Post: 56 | Registrato il: 18/10/2016
| Città: COSENZA | Età: 65 | Utente Junior | Excel 2007 | | OFFLINE | |
|
| 29/12/2022 09:45 | |
Disattivare X di chiusura cartella Buongiorno,
la soluzione:
Apri il VBA con ALT+F5,
doppio click su "Thisworkbook",
sul modulo che si apre, a destra, click sulla casella a discesa a sinistra, e scegli "Workbook"
poi nella casella a discesa a destra scegli "BeforeClose"
nella sub che viene proposta scrivere:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
risp = MsgBox("Chiudere questa cartella!!?", vbYesNo)
If risp = vbNo Then
Cancel = True
End If
End Sub
Allego file di esempio.
In questo modo si inibisce la chiusura della cartella.
Ma viene chiesta conferma.....
Ovviamente il lavoro va fatto per tutte le cartelle che si intende "inibire".....
Buon anno a tutti!
|
| | Post: 1.048 | Registrato il: 24/06/2015
| Città: CATANIA | Età: 80 | Utente Veteran | Excel2019 | | OFFLINE |
|
| 29/12/2022 10:12 | |
Buongiorno a tutti
@darionardella
Ma la richiesta si riferisce ad uno "Sheet" non al "Workbook"
Come avevo detto (guarda questa immagine: https://www.dropbox.com/s/rvb3kn5hvxup0rh/DoppiaX.JPG?dl=0) la richiesta è la chiusura della "X" in basso non proprio quella all'estremità.
Ribadisco, a mio modesto parere non si può fare (anche se un modo c'è - ed io non l'ho testato per timore di combinare guai).
Il codice che allego ( SENZA ALCUNA RESPONSABILITA') l'ho trovato nella mia cassetta degli attrezzi.
Ripeto: non l'ho mai testato ma dovrebbe impedire di chiudere, spostare, minimizzare, massimizzare Excel.
Eccolo:
Private Const MF_BYPOSITION As Long = &H400
Private Const mlNUM_SYS_MENU_ITEMS As Long = 9
Private Declare Function GetSystemMenu Lib "user32" _
(ByVal hWnd As Long, ByVal bRevert As Long) As Long
Private Declare Function DeleteMenu Lib "user32" _
(ByVal hMenu As Long, ByVal nPosition As Long, _
ByVal wFlags As Long) As Long
Private Declare Function FindWindowA Lib "user32" _
(ByVal lpClassName As String, ByVal lpWindowName _
As String) As Long
Public Sub DisableSystemMenu()
Dim lHandle As Long, lCount As Long
On Error Resume Next
lHandle = FindWindowA(vbNullString, Application.Caption)
If lHandle <> 0 Then
'Disattivare la croce di chiusura Excel e il commando di chiusura del menu
DeleteMenu GetSystemMenu(lHandle, False), 6, &H400
'cancella separazione
DeleteMenu GetSystemMenu(lHandle, False), 5, &H400
'cancella la possibilità di massimizzare
DeleteMenu GetSystemMenu(lHandle, False), 4, &H400
'cancella la possibilità di minimizzare
DeleteMenu GetSystemMenu(lHandle, False), 3, &H400
'Disattiva la possibilità dello spostamento
DeleteMenu GetSystemMenu(lHandle, False), 2, &H400
'cancella il commando spostamento
DeleteMenu GetSystemMenu(lHandle, False), 1, &H400
'cancella la possibilità di reimpostare il sistema
DeleteMenu GetSystemMenu(lHandle, False), 0, &H400
End If
End Sub
'Rimette tutto il sistema come prima
Public Sub EnableSystemMenu()
Dim lHandle As Long
On Error Resume Next
lHandle = FindWindowA(vbNullString, Application.Caption)
GetSystemMenu lHandle, True
End Sub
A voi la possibilità di testarlo (con le necessarie cautele).
Ciao,
Mario
[Modificato da Marius44 29/12/2022 10:16] |
| | Post: 58 | Registrato il: 18/10/2016
| Città: COSENZA | Età: 65 | Utente Junior | Excel 2007 | | OFFLINE | |
|
| 29/12/2022 10:27 | |
Disattivare X di chiusura cartella Ma se fai attenzione, è proprio quella X che inibisce.
Prova....
La X più in alto a destra chiude l'applicazione e tutte le cartelle aperte nell'applicazione,
mentre quella in basso chiude solo la cartella visualizzata al momento.....
Esiste una finestra dell'applicazione, e una finestra delle cartelle aperte......
L'applicazione ha una sola X in alto a destra, mentre le cartelle aperte hanno ognuna la propria X in basso.
Quando apri una cartella, in realtà si aprono due finestre:
Applicazione, che contiene la barra degli strumenti, e la cartella aperta, che cambia ogni volta che apri una cartella nell'applicazione.
Io penso che il problema è risolto.
Dario |
| | Post: 59 | Registrato il: 18/10/2016
| Città: COSENZA | Età: 65 | Utente Junior | Excel 2007 | | OFFLINE | |
|
| 29/12/2022 11:15 | |
Disattivare X di chiusura cartella Caro Marius44,
non esiste una X del foglio......
Quello che vedi quando apri una cartella è il foglio attivo, che puoi cambiare dalle linguette (tab), ma non puoi chiudere un foglio.
Puoi solo disattivarlo passando ad un altro foglio.
E' possibile impedire il passaggio ad altri fogli....
con la routine seguente, da scrivere sempre nella cartella del foglio interessato.....
sostituisci a "FOGLIO1" il nome del foglio che non vuoi "chiudere".
Ricorda che i fogli possono essere nascosti:
Click destro sul tab del foglio e "Nascondi"
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
If UCase(Sh.Name) = "FOGLIO1" Then
Sheets("Foglio1").Select
End If
End Sub
|
| | Post: 109 | Registrato il: 01/06/2016
| Città: PISA | Età: 64 | Utente Junior | 2003 | | OFFLINE | |
|
| 03/01/2023 16:53 | |
Innanzitutto BUON 2023 a tutti!!!
Dopo essere rientrato dalle ferie il lavoro mi ha letteralmente assalito.
Finalmente adesso riesco a rispondere (sono riuscito a ritagliarmi un buco).
...la soluzione di darionardella pare che faccia proprio al caso mio!!!
Grazie!!!
E grazie a tutti, per avermi dedicato un pò del vostro tempo.
🙏🙏🙏🙏🙏🙏🙏🙏🙏🙏 [Modificato da elioeco 03/01/2023 16:59] EcoBand |
|
|
|
|