Supprimer les lignes vides Excel avec VBA !

Option Explicit   Const TARGET_SHEET_NAME As String = « DATA » ‘A remplacer par le nom de l’onglet que vous voulez traiter.   Sub supprimer_lignes_vides()   Dim RowNumber As Integer   Sheets(TARGET_SHEET_NAME).Activate   RowNumber = Cells.SpecialCells(xlCellTypeLastCell).Row   Do While RowNumber > 0   If Rows(RowNumber).Find(« * ») Is Nothing Then Rows(RowNumber).Delete   RowNumber = RowNumber – 1   Loop […]

Lire la suite


Manipuler Word en Vba depuis Excel

Sub GestionWord () Set AppWord=CreateObject(« Word.Application ») On Error Resume Next ‘ Cherche une instance de Word si elle existe Set AppWord = GetObject(, « Word.Application ») If Err <> 0 Then ‘ Si GetObject échoue, utiliser CreateObject pour créer une instance de Word Set AppWord = CreateObject(« Word.Application ») End If ‘ ajoute un nouveau document AppWord.Documents.Add ‘ insère du […]

Lire la suite


Compter le nombre de fichiers dans un répertoire avec une (ou des) extensions passées en paramètres

Dans un module en VBA, copier/coller le code suivant : Sub AfficheTotalFichiers()     Debug.Print  NombreFichiers(« C:\Mes Documents\ », « docx », « xlsx ») End Sub ‘Fonction qui compte le nombre de fichiers dans un répertoire Function NombreFichiers(Chemin As String, ParamArray LesExtensions() As Variant) As Long     Dim Fichier As String     Dim Extension As Variant     […]

Lire la suite


Comment mettre une ip statique ?

Connectez vous en local sur votre raspberry ou par ssh avec l’utilisateur pi. Vous pouvez aussi prendre n’importe quel utilisateur avec les droitssudo. Tapez dans le terminal : sudo nano /etc/network/interfaces Remplacez : iface eth0 inet dhcp par : iface eth0 inet static     address 192.168.1.x     netmask 255.255.255.0     network 192.168.1.0     broadcast 192.168.1.255     gateway 192.168.1.1 Veuillez adapter […]

Lire la suite


Détecter l’ouverture des portes et fenêtres

Aujourd’hui nous allons voir comment détecter l’ouverture d’une porte, d’une fenêtre, ou de quoi que ce soit qui s’ouvre ou qui se ferme, avec le raspberry PI et un petit composant à environ 3€. L’état de la porte (ouverte/fermée) sera visible depuis une interface web, ou depuis notre interface de reconnaissance/synthèse vocale YURI (implantée dans […]

Lire la suite


Prendre une capture d’écran du Raspberry pi

Je vais vous montrer comment prendre une capture d’écran de votre Raspberry pi, ainsi vous pourrez partager votre expérience avec d’autres. Installation de Scrot Tout d’abord, il faut installer l’utilitaire qui va vous permettre de faire des captures d’écran. Ouvrez un terminal et tapez la commande suivante : sudo apt-get install scrot Utiliser Scrot Pour […]

Lire la suite


Comment autoriser l’accès d’une feuille via un Mot de passe

le Code VBA : ‘**************************************************** ‘ Procédure permettant d’accéder à une feuille ‘ grâce à une identification par mot de passe ‘**************************************************** Private Sub Workbook_Open() ‘Déclaration des variables Dim i As Integer Dim MonPassword As Variant ‘Gestion des erreurs On Error GoTo 1 ‘On ouvre le classeur sur la feuille Sommaire Worksheets(« Sommaire »).Activate ‘On boucle pour […]

Lire la suite


Mettre à jour votre Raspberry Pi

sudo apt-get update sudo apt-get dist-upgrade sudo apt-get upgrade L’optionupdatemet à jour la liste des fichiers disponibles dans les dépôts APT présents dans le fichier de configuration /etc/apt/sources.list. L’option upgrade met à jour tous les paquets installés sur le système vers les dernières versions (couramment utilisé). L’option dist-upgrade met à jour tous les paquets installés vers les […]

Lire la suite