Création d'un raccourci avec un nom aléatoire
Résolu/Fermé
fefe_du_973
Messages postés
13
Date d'inscription
lundi 6 avril 2020
Statut
Membre
Dernière intervention
26 novembre 2020
-
Modifié le 20 avril 2020 à 14:54
fefe_du_973 Messages postés 13 Date d'inscription lundi 6 avril 2020 Statut Membre Dernière intervention 26 novembre 2020 - 21 avril 2020 à 09:57
fefe_du_973 Messages postés 13 Date d'inscription lundi 6 avril 2020 Statut Membre Dernière intervention 26 novembre 2020 - 21 avril 2020 à 09:57
A voir également:
- Création d'un raccourci avec un nom aléatoire
- La création de contenu sous ce nom n’est pas autorisée. essayez un autre nom. ✓ - Forum Facebook
- Creer un raccourci clavier - Guide
- Trouver un nom avec une adresse ✓ - Forum Réseaux sociaux
- Raccourci word - Guide
- Creation compte gmail - Guide
5 réponses
yg_be
Messages postés
23352
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 novembre 2024
Ambassadeur
1 554
20 avril 2020 à 15:08
20 avril 2020 à 15:08
bonjour, tes nombreuses recherches t'ont-elles menées à lire ceci?
https://docs.microsoft.com/fr-ch/office/vba/language/reference/user-interface-help/rnd-function
https://docs.microsoft.com/fr-ch/office/vba/language/reference/user-interface-help/rnd-function
fefe_du_973
Messages postés
13
Date d'inscription
lundi 6 avril 2020
Statut
Membre
Dernière intervention
26 novembre 2020
20 avril 2020 à 15:10
20 avril 2020 à 15:10
Le problème c'est que ça met le nom de la commande au lieu de l'exécuter
fefe_du_973
Messages postés
13
Date d'inscription
lundi 6 avril 2020
Statut
Membre
Dernière intervention
26 novembre 2020
20 avril 2020 à 15:22
20 avril 2020 à 15:22
sinon je veux bien un exemple de commande stp
yg_be
Messages postés
23352
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 novembre 2024
1 554
20 avril 2020 à 17:19
20 avril 2020 à 17:19
voici un exemple:
dim nombrealeatoire randomize nombrealeatoire=rnd msgbox nombrealeatoire
fefe_du_973
Messages postés
13
Date d'inscription
lundi 6 avril 2020
Statut
Membre
Dernière intervention
26 novembre 2020
Modifié le 21 avril 2020 à 08:47
Modifié le 21 avril 2020 à 08:47
merci pour ta réponse mais je veux que le nom du raccourci soit le nombre aléatoire choisi par ton programme peut t'on faire un programme qui choisi un nombre avec ça :
et une fois le nombre choisi l'applique au nom du raccourci :
peut t-on fusionner les codes pour faire ce que je veux ?
Si possible m'écrire le code nécessaire (je suis débutant)
dim nombrealeatoire
randomize
nombrealeatoire=rnd
msgbox nombrealeatoire
et une fois le nombre choisi l'applique au nom du raccourci :
Dim Shell, DesktopPath, INK
Set Shell = CreateObject("WScript.Shell")
DesktopPath = Shell.SpecialFolders("Desktop")
Set Ink = Shell.CreateShortcut(DesktopPath & "\nombrealeatoire.lnk")
Ink.TargetPath = "E:\ancienne clée\xxxx\xxxx\xxxx\lance.exe"
Ink.Save
peut t-on fusionner les codes pour faire ce que je veux ?
Si possible m'écrire le code nécessaire (je suis débutant)
yg_be
Messages postés
23352
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 novembre 2024
1 554
21 avril 2020 à 09:34
21 avril 2020 à 09:34
pour te permettre de ne pas rester débutant, il me semble préférable que tu fasses une partie du travail.
par ailleurs, merci d'utiliser les balises de code quand tu postes du code sur le forum: https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
pour fusionner les deux codes, ajoute les trois premières lignes de mon code après la première ligne de ton code.
ensuite, modifie la ligne
par ailleurs, merci d'utiliser les balises de code quand tu postes du code sur le forum: https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
pour fusionner les deux codes, ajoute les trois premières lignes de mon code après la première ligne de ton code.
ensuite, modifie la ligne
Set Ink =de ton code, ainsi:
Set Ink = Shell.CreateShortcut(DesktopPath & "\" & cstr(nombrealeatoire) & ".lnk")
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
fefe_du_973
Messages postés
13
Date d'inscription
lundi 6 avril 2020
Statut
Membre
Dernière intervention
26 novembre 2020
21 avril 2020 à 09:57
21 avril 2020 à 09:57
Merci beaucoup pour ta réponse !!!
problème réglé !
Bonne journée et bon confinement
cordialement !
problème réglé !
Bonne journée et bon confinement
cordialement !