Changer les noms de mes fichiers

Fermé

rajaoui75 Messages postés 1 Date d'inscription jeudi 24 mai 2018 Statut Membre Dernière intervention 24 mai 2018 - 24 mai 2018 à 14:41
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 17 juin 2018 à 14:45

Bonjour,

Je souhaiterais changer les noms de mes 10000 fichiers excel et les convertir en PDF,

1: j'ai un fichier où j'ai intégré les chemins de mes fichier, (en hypertext)
2: j'ai cette macro (que je n'arrive pas à faire fonctionner):
Sub test()
Dim nom As String, nom1 As String
nom1 = Range(" D15")
nom = nom1 & ".pdf"
if ( B1<> " ")
ActiveSheet. ExportAsFixedFormat Type :=xlTypePDF, Filename=nom
then
select cellule offset-1
End Sub
Je ne suis pas un pro dans excel, (raison pour la quelle je vous sollicite),

SVP j'ai vraiment besoin de votre savoir!

A voir également:

Changer les noms de mes fichiers
Changer dns - Guide
Piratage facebook changer mot de passe - Guide
Wetransfer gratuit fichiers lourd - Guide
Changer clavier qwerty en azerty - Guide
Changer extension fichier - Guide

2 réponses

Réponse 1 / 2

tyranausor Messages postés 3545 Date d'inscription jeudi 6 août 2009 Statut Membre Dernière intervention 1 avril 2022 2 031
17 juin 2018 à 11:56

Bonjour, tu peux utiliser la coloration syntaxique (voici comment). Dans ton script qu'est ce que "B1"?

if (b1 <>"") then 
'ton code
end if 'vba ne comprendra pas!

Réponse 2 / 2

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 776
17 juin 2018 à 14:45

Bonjour,

Tu trouveras ici un excellent cours VBA gratuit pour débutants :
ftp://ftp-developpez.com/bidou/Cours/VBA/formationVBA.pdf

Discussions similaires

"Nom de l'adresse" lors d'une inscription sur une site

comment donner les droits sur fichier partage

Discussions similaires

Newsletters