L’enregistrement automatique

Poursuivons sur le thème de la sécurité : La sauvegarde automatique de vos classeurs est t’elle bien paramétrée ? De quoi se prémunir des plantages du logiciel ou des incidents électriques intempestifs.

- 1 – accédez aux options du logiciel, Bouton Office / Options Excel / Enregistrement :

- 2 – Veillez à ce que la case Enregistrer les informations de récupération automatique toutes les n minutes soit cochée.

- 3 –Régler la valeur de n, un temps compris entre 10 et 20 minutes semble raisonnable

- 4 – Les autres options permettent de choisir :

• Le format par défaut des classeurs pour les utilisateurs désireux de s’assurer l’emploie constant du mode de compatibilité (format 97-2003)
• L’emplacement par défaut des sauvegardes automatiques
• L’emplacement par défaut des classeurs.
• Inhiber éventuellement la sauvegarde automatique pour le classeur en cours

- 5 – En cas de problème, Excel vous proposera lors du redémarrage (dans le panneau de gauche), de récupérer le fichier qu’il a enregistré automatiquement ou le fichier d’origine, faites votre choix et enregistrer le.

Partager |

Protéger l’accès à un classeur

Une rentrée bien difficile et pas beaucoup de temps pour « Blogger » ! je vais essayer de reprendre les bonnes habitudes…Voici un petit article sur les mots de passe, de quoi améliorer la sécurité et la confidentialité de vos données

- 1 – C’est au cours de l’enregistrement du classeur que l’on va créer le mot de passe, donc Bouton Office / enregistrer sous

- 2 – Cliquer sur le bouton Outils et sélectionner l’option : Options générales…

- 3 – Pour autoriser l’ouverture du classeur entrez un mot de passe dans la zone lecture ; pour autoriser la lecture mais pas la modification (lecture seule) entrez un mot de passe dans la zone modification. Il est évidement possible de faire les deux avec un même ou deux mots de passe différents.

- 4 – Terminer votre enregistrement

- 5 – Dans cet exemple Excel me demande le mot de passe avant l’ouverture du classeur test.xlsx

- 6 – Attention ! Il n’y aura pas de solution si vous avez malencontreusement égaré ou oublié le mot de passe

Rappel ! Un mot de passe peut être qualifié de fort s’il mélange des lettres majuscules, minuscules, des chiffres et d’autres symboles pour une longueur minimale de 8 caractères.

Partager |

VBA : L’objet WebBrowser

En réponse à l’article du 2 avril 2009 sur l’importation de tableau HTML, un lecteur me demande comment on pourrait récupérer des images se trouvant dans le dit tableau ? Evidement la méthode des données externes ne peut convenir ici, mais plusieurs méthodes permettent de réaliser ce travail…Aujourd’hui laissez moi vous présenter l’objet WebBrowser !

- 1 – Avant tous vous allez charger dans votre éditeur VBA, les bibliothèques Microsoft HTML Object Library et Microsoft Internet Controls. (Si vous n’êtes pas sur de la démarche, lisez l’article du 9 Mai 2009)

- 2 – Placez dans votre feuille de calcul, deux objets WebBrower. Pour cela utiliser la commande Développeur / Insérer / Autres contrôles…Dans la liste sélectionnez le contrôle Microsoft Web Brower, cliquez sur le bouton OK et glisser pour tracer votre contrôle. La taille et la position de l’objet n’ont pas d’importance pour l’instant.

- 3 –Comme son nom l’indique un Web Brower est simplement un navigateur Internet que l’on a ici incorporé dans notre feuille de calcul. Donc il va nous permettre d’afficher des pages web et d’en étudier le contenu…

- 4 – La première partie du programme a pour objet d’afficher une page web dans le premier web browser et de trouver des informations sur cette page, notamment le nombre et la liste des images qu’elle contient.

- 5 – La seconde partie ramène dans la feuille une image précise en adaptant la taille du webbrowser à la taille de l’image.

- 6 – Voici le code, puisse t’il vous inspirer des améliorations…

Option Explicit

Private Sub Worksheet_Activate()
'ici je lance ma procédure à l'ouverture du classeur
'à vous de choisir éventuellement un autre événements et (ou) un autre objet
Dim maPageHtml As HTMLDocument
Dim imgHtml As HTMLImg
Dim resultat As String
Dim I As Integer
Dim haut As Integer
Dim larg As Integer
'position et taille du premier webbrowser
Feuil2.WebBrowser1.Left = 1
Feuil2.WebBrowser1.Top = 1
Feuil2.WebBrowser1.Width = 400
Feuil2.WebBrowser1.Height = 200
'position du seond webbrowser
Feuil2.WebBrowser2.Left = 500
Feuil2.WebBrowser2.Top = 1
'affichons une page dans le premier webbrower
Feuil2.WebBrowser1.Navigate "http://www.olivier-picot.fr/pagetest.html"
'analysons le contenu de cette page et retournons
'son url + date de modification + taille + nombre d'images
Set maPageHtml = WebBrowser1.Document
resultat = "adresse de la source : " & maPageHtml.URL & vbLf & _
"derniere modification de la page : " & maPageHtml.LastModified & vbLf & _
"taille de la page : " & maPageHtml.fileSize & " octets " & vbLf & _
"nombre d'images dans la page : " & maPageHtml.images.Length & "."
'affichons cette information
MsgBox resultat, , "Information"
'boucle sur les images pour récupérer leurs noms et écriture dans ma feuille de cacul
For I = 0 To maPageHtml.images.Length - 1
Set imgHtml = maPageHtml.images.Item(I)
Feuil2.Cells(I + 15, 1) = imgHtml.src
Next I
'**************************************
'je recupere la taille de la seconde image de ma page
Set imgHtml = maPageHtml.images.Item(1)
haut = imgHtml.Height
larg = imgHtml.Width
'pour adapter la taille de mon webbrowser à celle de mon image
Feuil2.WebBrowser2.Width = larg
Feuil2.WebBrowser2.Height = haut
'un peu de html et l'image est récupérée
.WebBrowser2.Navigate "about:<img src="http://www.olivier-picot.fr/album2.png" />"
'il est impossible de passer des variables VBA au code HTML aussi cette méthode ne ‘permet de récupérer toutes les images d'une page sans les nommer une à une et les ‘afficher dans des webbrowser différents
End Sub

Partager |

VBA : Les modules d’un projet

Modules de code, de feuilles, de classeur…les débutants sont un peu perdu dans les différents modules d’un VBAProject. Ou faut’ il écrire le code ? A quelles conditions les procédures peuvent-elles être appelées ? Ce petit schéma devrait vous aider à y voir plus clair !

Partager |

VBA : Déclarations implicites des types de données

Lorsque vous déclarez vos variables vous avez l’habitude de préciser explicitement le type de données grâce au mot clé As (Exemple Dim prenom as String). Mais savez vous que vous avez à votre disposition deux autres méthodes permettant la précision de manière implicite.

- 1 – La première méthode consiste à utiliser un suffixe correspondant au type de données :
Dim prenom$
Déclare la variable prenom de type chaîne (String).

% Integer
& Long
! Single
# Double
@ Currency
$ String

- 2 – La seconde méthode utilise l’instruction DefType : Une instruction de type DefStr E-G, X signifie que toutes les variables de toutes les procédures d’un module dont les noms commencent par e, f, g ou x sont de type String. Pour cela la déclaration doit figurer dans le module général de code.

Exemple :

Option Explicit
DefStr E-G, X
Sub test()
‘il devient inutile de préciser le type de ‘ces variables
Dim ea
Dim fa
Dim ga
Dim xa
ea = "A"
fa = "B"
xa = "A"
ga = ea & fa & xa
MsgBox ga
End Sub

Liste des DefType :

DefBool Boolean

DefDbl Double

DefInt Integer

DefDate Date

DefLng Long

DefStr String

DefCur Currency

DefObj Object

DefSng Single

DefVar Variant

DefByte Byte

Partager |