Inscription
11 août 2004
Dernière intervention
11 juin 2010
Interventions
53

[Catégorie modifiée VB6 --> VBA] PROTECTION

Bonjour, Je suis chargé de mettre en place un planning annuel pour gérer des équipes des équipes de garde. j'ai donc réalise un calendrier perpétuel avec les options qui vont bien. je souhaite proteger automatiquement les colonnes dont la date est antérieur à la date du jour.Et là, je suis bloqué. Je n'ai pas trouver comment j... Lire la suite

Ouvrir Explorateur Windows dans un répertoire dont le nom est variable [Résolu]

Bonjour, J'utilise le code suivant pour ouvrir l'Explorateur Windows depuis VB6. Private Sub Ouvrir_Windows_Explorer_Click ()  Dim taskid as long  taskid = shell ("C:\Windows\explorer.exe C:\Windows", vbNormalFocus) End sub Le problème est que dans ce cas, l'explorateur windows s'ouvre toujours dans le répertoire c:\Windows. ... Lire la suite

DateLastAccessed pour fichier en VB6 [Résolu]

Bonjour, Je suis en VB6. Ci-dessous mon code qui me permet de trouver la date et l'heure du dernier accés à un fichier. Le problème c'est qu'il ne me donne que la date, pas l'heure. J'obtiens : 03/12/2008 00:00:00 et j'ai vérifié, mon dernier accés n'était pas à minuit pile ! J'ai l'impression, que la commande DateLastAccessed re... Lire la suite

Form et module

Bonjour, Je suis en VB.net. Avant je programmais en VB6. J'ai une form1 avec un bouton nommé Button1. J'ouvre un module dans lequel je cré une subroutine pour changer le texte sur le bouton. En VB6, cela donnait : Sub Changer_nom _VB6  Form1.Button1.caption="Nouveau_texte" End sub En VB.net, il ne comprend pas. Lorsque... Lire la suite

Fonction et Byref [Résolu]

Bonjour, J'ai trouvé ce code sur ce site écrit par by Lover. Il est très bien fait pour ce que je désire faire. Merci à by Lover. La fonction Add permet de réaliser la somme ou la soustraction de deux matrices carrées. Donc en argument d'entrée, j'ai les matrices M1 et M2 puis le boolean indiquant s'il s'agit d'une somme ou soustract... Lire la suite

Balayer les controls d'une form [Résolu]

Bonjour, Je suis en VB6. J'ai créé 40 Shapes de différentes couleurs sur une form. Je voudrais les balayer 1 par un avec une boucle For I=1 to 40 et changer l'épaisseur de leur cadre (Shape1.BorderWidth). Je pense qu'il est possible de le faire grace aux numéro d'index de chaque SHAPE mais je ne sais pas comment. Si vous pou... Lire la suite

Protection fichier excel

Bonjour J’ai deux fichiers excel liés. Le premier fichier appelé « TEST1 » a des données que le deuxième fichier « TEST2 » exploite. Mon premier fichier est protégé et en lecture seule. Les liaisons dans le deuxième fichier ne se font donc pas. Quel peut-être le code pour déverrouiller la protection et la lecture seule pour se... Lire la suite

Aide arrondi et chiffres apres la virgule DOUBLE

Salut à tous, je me suis mis a chipoter une peu sur le VBA depuis peu, et la suis sur un os... J'ai un petit problème : je n'arrive pas pas à récupurer un nombre avec virgule à l'issue de ma multiplication. L'arrondi se fait automatiquement à l'unité suppérieur. Voici mon code Private Sub Quantité_Change()    Prix_final.Visible... Lire la suite

Numéro de série disque dur

Bonjour, Je recherche une méthode pour trouver le numéro de série du disque dur. Il y a quelques codes sur le forum mais ces codes ne donnent pas le vrai numéro de série du disque dur. Si on formate le disque, le numéro change. Moi je veux le vrai numéro de série, celui qui est "gravé" pour toujours sur le disque. Merc... Lire la suite

Fonction aléatoire dans un tableau ?

Bonjour, J'ai un tableau à deux variables rempli de"0" et je souhaiterai qu'il me mette aléatoirement des "1"  dans un certain nombre de cases. Comment est ce que je peux faire une cette fonction aléatoire ? Ensuite encore une petite question, comment trouver le min et le max d'une série de nombres, puis comment la trier ? Merci Lire la suite

Protéger mon application (Pour les pro de la Prog) [Résolu]

Bonjour, Je voudrais juste l'avis des pro. de la programmation. Je suis un débutant autodidacte. J'ai réalisé une application. Elle ne sera installée que sur quelques PC. Pour éviter qu'elle soit copiée et installée n'importe où, je l'ai protégé en utilisant la Mac adresse des PC. Lorsque l'application se lance, je vérifie si... Lire la suite

Evenement touche clavier [Résolu]

Bonjour, Je voudrais à n'importe quel moment de mon application lancer une méthode lorsqu'on appuie sur une touche précise. J'ai essayé avec l'événement keydown ou keypress du formulaire: ca marche mais dés que le formulaire n'a plus le focus donc dés qu'il y a d'autres contrôles ça ne marche plus car cet évenement est propre à ... Lire la suite