XL 2010 VBA - SourceFolder et DestinationFolder

Titi456 · 3 Octobre 2023

Bonjour,

Dans un de mes codes j'ai ceci:

VB:

    SourceFolder = "C:\Users\Desktop\Test 1"
    DestinationFolder = "C:\Users\Desktop\Test 2"

Mais je souhaiterais que les chemins d'accès en question soient noté dans mes cellules A2 et B2.
J'ai essayé ceci mais ça ne fonctionne pas:

Code:

    SourceFolder = Cells(A2).Value
    DestinationFolder = Cells(B2).Value

Pouvez-vous m'aider?

Mes meilleures salutations,

Thierry

sylvanu · 3 Octobre 2023

Bonjour Titi,
C'est soit Range("A2") soit Cells(2,1) ... mais pas les deux. Essayez :

VB:

SourceFolder = Range("A2")
DestinationFolder = Range("B2")
ou
SourceFolder = Cells(2,1)
DestinationFolder = Cells(2,2)
ou
SourceFolder = Cells(2,"A")
DestinationFolder = Cells(2,"B")
ou
SourceFolder = [A2]
DestinationFolder = [B2]

sylvanu · 3 Octobre 2023

Bonjour Titi,
C'est soit Range("A2") soit Cells(2,1) ... mais pas les deux. Essayez :

VB:

SourceFolder = Range("A2")
DestinationFolder = Range("B2")
ou
SourceFolder = Cells(2,1)
DestinationFolder = Cells(2,2)
ou
SourceFolder = Cells(2,"A")
DestinationFolder = Cells(2,"B")
ou
SourceFolder = [A2]
DestinationFolder = [B2]

Cousinhub · 3 Octobre 2023

Bonjour,
@Titi456, tu ne peux vraiment pas attendre que la personne qui a pris en charge ta demande sur un autre forum te réponde?
D'autant qu'il vient de le faire à peine 20 minutes suite à ta question (concernant un code qu'il t'a fourni)
Pas vraiment sympa...

Titi456 · 3 Octobre 2023

Bonjour Sylvanu,

Ca parait tellement simple et je suis pas fichu d'y arriver. Merci beaucoup pour votre aide.

CousinHub: Vous avez parfaitement raison et je m'en excuse.

Bonne fin de journée à vous deux et encore merci.

Thierry

XL 2010 VBA - SourceFolder et DestinationFolder

Titi456

XLDnaute Junior

sylvanu

sylvanu

XLDnaute Barbatruc

Cousinhub

XLDnaute Barbatruc

Titi456

XLDnaute Junior

Discussions similaires