Récupération numéro série d'un PC

[bendouch71]

bonjour, à tous.
Dans le cadre de mon stage en contrôle de gestion je dois réaliser une étude sur le cout informatique d'une société.
je dois donc au préalable effectuer un inventaire du parc informatique.
Je veux ainsi pouvoir récupérer le numéro de série d'un ordinateur à partir d'une macro excel. La plus part du temps le numéro de série n'est plus lisible sur l'étiquette apposée sur le matériel.
Je peux certes le récupérer dans le bios mais je trouve ça peu commode et moins rapide que la solution que vous allez me proposer.
Merci d'avance.

 

[jeanpierre]

Re : Récupération numéro série d'un PC

Bonsoir bendouch71,

Quel rapport avec le bios et ton problème d'étiquettes... ?

A te lire donc.

Jean-Pierre

 

[Cousinhub]

Re : Récupération numéro série d'un PC

Bonjour,

bonjour, JP

avec ce code, tu récupères pas mal d'infos, sur ton PC :

Sub Var_Env()
For i = 1 To 29
Cells(i, 1).Value = Environ(i)
Next i
End Sub

 

[bendouch71]

Re : Récupération numéro série d'un PC

Dans le cadre de l'inventaire, Je dois apposer sur les PC une étiquette avec le logo de la société et leur numéro de série.
Grace à un outil d'inventaire informatique (ocs inventory pour ceux qui connaissent) j'ai pu récupérer la plupart des numéros de série.
Mais pour certains, impossible de trouver le numéro car il n'y a plus l'étiquette du constructeur.

je vais donc me ballader dans les différents services et agences de la société et quand je vais tomber sur un Pc dont je ne connais pas le numéro de série, je devrais le récupérer mais comment, :
>> à partir du BIOS mais pas pratique s'il faut redémarrer l'ordinateur
>> ainsi, je voudrai pouvoir le récupérer d'une autre maniére : par une macro excel par exemple.

Aprés une recherche plus minutieuse, j'ai trouvé un lien vers un classeur qui pourrait répondre à mon besoin mais dont je ne peux accéder :

Récupérer quelques informations sur votre PC
le nom du PC
le systeme utilisé
les noms et types de lecteurs ( avec le numéro de serie et l'espace libre pour les disques durs )
la résolution de l'écran
la mémoire physique totale et libre
la liste des imprimantes installées et l'imprimante active
la version d'Excel et de VBE
les processeurs
l'utilisateur
l'adresse IP

Le lien sur le forum XLD
Lien supprimé
Le fichier zippé
Lien supprimé

j'aimerai récupérer ce classeur.
Merci

 

[bendouch71]

Re : Récupération numéro série d'un PC

Merci de ta contribution bhbh mais je n'obtiens pas mon numéro de série dans toutes ces informations.

 

[MichelXld]

Re : Récupération numéro série d'un PC

bonjour

Aprés une recherche plus minutieuse, j'ai trouvé un lien vers un classeur qui pourrait répondre à mon besoin mais dont je ne peux accéder :

Tu peux télécharger le classeur en suivant ce lien :

https://www.excel-downloads.com/threads/afficher-quelques-informations-sur-votre-pc.24359/



bon week end
michel
Microsoft Excel MVP

 

[bendouch71]

Re : Récupération numéro série d'un PC

Merci beaucoup Michel, c'est exactement ce que je cherchais.