Autres Fonctions volatiles et invite à la fermeture du fichier

  • Initiateur de la discussion Initiateur de la discussion job75
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

job75

XLDnaute Barbatruc
Bonjour le forum,

Excel possède un certain nombre de fonctions volatiles : AUJOURDHUI() MAINTENANT() DECALER() INDIRECT() ALEA()...

Elles se recalculent quand on modifie des cellules et aussi à l'ouverture du fichier.

Sur les précédentes versions Excel que j'ai eues (2003, 2010, 2013) quand on refermait le fichier il y avait une invite pour l'enregistrer, ce qui était agaçant.

Sur mon nouvel ordi avec Excel 2019 (64 bits) il n'y a plus l'invite à la fermeture.

Est-ce propre à Excel 2019 ou y a-t-il eu récemment une modification pour toutes les versions ?

Merci de me dire ce qu'il en est chez vous.

A+
 
Re,

Pour connaître la version d'Excel, je me sers de code (à vérifier pour XL2019 mais ça devrait être bon) :
VB:
Sub QuelleVersionOfficeSurMonPc()
Dim i As String
Dim var As Boolean
NumeroVersionOffice = CStr(Application.Version)
#If Win64 Then
var = True
#End If
If var = True Then
i = "64 bits"
Else
i = "32 bits"
End If
Select Case NumeroVersionOffice
Case "7.0": NomVersionOffice = "Office 97"
Case "8.0": NomVersionOffice = "Office 98"
Case "9.0": NomVersionOffice = "Office 2000"
Case "10.0": NomVersionOffice = "Office XP"
Case "11.0": NomVersionOffice = "Office 2003"
Case "12.0": NomVersionOffice = "Office 2007"
Case "14.0": NomVersionOffice = "Office 2010"
Case "15.0": NomVersionOffice = "Office 2013"
Case "16.0": NomVersionOffice = "Office 2016"
'Case "17.0": NomVersionOffice = "Office 2019" sous réserve
Case Else
End Select

MsgBox "Vous utilisez " & NomVersionOffice & " " & ":" & " " & i

End Sub
Bon dimanche
@+ Eric c
 
J'ai aussi ceci pour la version Win et la version XL

VB:
Sub Win32ouWin64()
If Len(Environ("ProgramW6432")) > 0 Then
MsgBox "Windows 64 bits"
Else
MsgBox "Windows 32 bits"
End If
End Sub


Sub Office32ou64bits()
Dim var As Boolean
#If Win64 Then
var = True
#End If

If var = True Then
MsgBox "Office 64 bits"
Else
MsgBox "Office 32 bits"
End If
End Sub

Bon dimanche
@+ Eric c
 
Bonjour @ tous,
Je suis sous Excel 2019 32bits, mais une fois que j'utilise le raccourci Ctrl+J je ne peux plus taper un autre séparateur dans "Autre", même sur un autre fichier, je suis censé fermer le fichier et Excel aussi pour que tout se remette en ordre.
Pour avoir la version d'Excel on n'a pas besoin d'une macro.
2020-01-05_14-03-01.png
 
Re,
En revanche, si tu te mets le prompt au début de la zone de saisie du délimiteur et fait "Supr" (Del), tu peux ensuite saisir le tiret comme délimiteur.
En fait je n'ai le problème qu'avec Ctrl+J, par contre si j'utilise un "-" comme séparateur et je change après le séparateur avec un " " ou "_" il n'ya aucun souci. Mais comme tu me l'as conseillé, avec la touche "Suppr" tout ce remet en ordre et je peux après changer de séparateur sans faute.


Cordialement
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Retour