Effacer le contenu de certains onglets d'un fichier (déjà ouvert)

Point2 de mon automatisation :

je dois effacer le contenu de plusieurs onglets d'un fichier (déjà ouvert) mais attention, certaines colonnes ont une formule que je devrai utiliser pour la suite.

exemple :

MonFichierOuvert

onglet "f1", contenu à effacer "A2:G2" jusque la fin des données (le nbre de lignes varie chaque mois)

=> en colonnes "h2:k2" jusque la fin des données, formules utiles pour la suite

onglet "f2", contenu à effacer "A2:H2" jusque la fin des données (le nbre de lignes varie chaque mois)

=> en colonnes "i2:l2" jusque la fin des données, formules utiles pour la suite

onglet "f3" contenu à effacer "A2:M2" jusque la fin des données (le nbre de lignes varie chaque mois)

=> en colonnes "N2:T2" jusque la fin des données, formules utiles pour la suite

Bonjour

Je suppose que c'est la suite du post précédent

Il faut donc le modifier

Sub Sonder()
Repertoire = "C:\x"
sFilename = Dir(Repertoire & "\*.xlsx")
Do While sFilename <> ""
    Workbooks.open Repertoire & "\" & sFilename
    Call EffacerFeuille
    sFilename = Dir
Loop
End sub

Sub EffacerFeuille

End Sub

Pour ce qui est du code pour effacer, vous avez un tas de sujets sur ce forum qui en parlent
ou vous avez l'enregistreur de macros

A+

Merci bcp

mais là je cale car ce ne sont pas tous les onglets qu'il faut effacer : certaines colonnes contiennent des formules qui devront être adaptées aux données,

le nombre de lignes variant tous les mois comme expliqué dans ma demande.

En annexe, je joins un fichier.zip avec 4 petits fichiers . Dans le fichier4, il y a un onglet reprenant les détails du code VBA que j'aimerais avoir.

Merci de votre attention.

Bonsoir TheCarlsilian

Il n'y a rien du tout de codé dans vos fichiers

Je pense que vous confondez forum d'aide avec œuvre de bienfaisance (ce que nous ne sommes pas)
Nous sommes tous des bénévoles et ne sommes pas là pour faire à votre place.

Pour commencer à créer votre code, vous pouvez utiliser l'enregistreur de macro
Lancez l'enregistrement, effectuer toutes les tâches que vous souhaitez effectuer puis arrêter l'enregistreur

Il restera à optimiser et peaufiner, ce que nous ferons volontier

Merci de votre compréhension

Bonjour,

Ci-joint, un fichier (xlsx) reprenant 3 colonnes :

-1) le code que j'ai créé : il fonctionne mais il devrait être amélioré;

-2) l'explication de mon code;

-3) la partie du code qui devrait être amélioré suivant les critères que j'explique : à ce niveau-là, je bloque...

J'espère que vous pourriez l'améliorer en expliquant ce que vous faites.

Merci de votre attention