Inscription
15 février 2004
Dernière intervention
10 février 2014
Interventions
3 172
Sexe
Homme
Signature
_____________ Kenji

Lecture du registre

Bonjour, J'ai un programme écrit en VB6 pour lire les information sur la version de Windows à l'aide de la fonction : Private Declare Function RegQueryValueEx Lib "advapi32" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, ByRef lpType As Long, ByVal lpData As String, ByRef lpcbData ... Lire la suite

macro excel : etirer les cellules d'une selection jusqu'à cellule non vide

Bonjour, Je débute dans la programmation des macros sur Excel. J'aimerais faire l'équivalent du double click sur la croix noir en bas à droite d'une cellule qui étire les formules Ce sont des cellules variables donc pas d'adresse type "A1" et le nombre de valeurs est aussi variable donc pas de destination type "A2:A354" Pour l... Lire la suite

Comparaison deux tables SQL et lister la difference [Résolu]

Bonjour, j'ai deux tables dans une base sql, je veux faire une comparaison entre les deux tables et lister la différence et cela selon trois champs qui permettent de faire une liaison entre les deux tables.

évènement After_Select à sélection unique [Résolu]

Bonjours, Voilà, actuellement pour permettre la sélection d'un fichier via un treeview, j'utilise l'évènement After_Select. Seulement ce qui m'embête c'est la sélection unique du fichier avec cet évènement. Je souhaiterai pourvoir re-sélectionner le même fichier par la suite si besoin est... Du coup, j'ai essayé avec MouseClick, Node... Lire la suite

Verouiller une Cellule Par un Mot de Passe [Résolu]

Bonjour, Comment vérouiller cette cellule "A1" par mot de passe. pour que seul les administrateur puisse changer la Valeur . voila ce que j'ai fait jusqu'à présent. Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Intersect(Range("A1"), Target) Is Nothing Then Target.Offset(0, 1).Select End If End Su... Lire la suite

Effacer un/les fichier [Résolu]

Bonjour à tous J'ai écrit une routine pour effacer tous les fichiers avec extension old Private Sub DeleteFiles(ByVal D As String, ByVal extension As String) Try For Each file As String In Directory.GetFiles(D, extension) list1.Items.Add(file) Directory.Delete(file) ... Lire la suite

[Catégorie modifiée .Net -> VB6] Comment afficher un texte sans pouvoir le modif [Résolu]

Bonsoir, Je cherche un moyen d'afficher un texte dans un objet, sans qu'on puisse l'effacer dans l'application, mais qu'on puisse le selectionner pour le copier et le coller ailleurs. (Le textbox peut être modifié, et le label ne peut pas être selectionné)

Créer des fichiers numérotés [Résolu]

Bonjour @tous, J'espère avoir correctement choisi le Thème. Voilà comme dit dans mon profil, je suis Concepteur de Produits en 3D via le logiciel SolidWorks. Il arrive parfois que dans certaines de mes missions clients je rencontre des fonctions spéciales. Dans ce cas un précédent dessinateur avait crée une macro pour enregistrer ... Lire la suite