MACRO VBA Excel vers MACRO Google Sheets

Y compris Google Docs, Slides et toute autre question en lien avec une application Google
L
Lionheart13010
Nouveau venu
Nouveau venu
Messages : 3
Inscrit le : 7 octobre 2019

Message par Lionheart13010 » 7 octobre 2019, 21:12

Bonsoir à toutes et tous,

Je viens solliciter votre aide pour un problème déjà évoqué sur ce forum mais que je ne retrouve plus ::( ::(

J'ai crée un fichier Excel avec une macro en VBA.

J'ai transféré ce fichier Excel sur un fichier Google Sheets et j'aimerais pour utiliser ma macro VBA sur ce fichier.

Ci-dessous le code VBA :
Sub Archiver()
    ligne = Sheets("- Suivi Factures -").Range("A6").End(xlDown).Row + 1
    Sheets("- Suivi Factures -").Range("A" & ligne).Value = Sheets("- Facture -").Range("A12").Value
    Sheets("- Suivi Factures -").Range("B" & ligne).Value = Sheets("- Facture -").Range("B12").Value
    Sheets("- Suivi Factures -").Range("C" & ligne).Value = Sheets("- Facture -").Range("C12").Value
    Sheets("- Suivi Factures -").Range("D" & ligne).Value = Sheets("- Facture -").Range("D27").Value
 
    Sheets("- Facture -").Range("B12").ClearContents
    Sheets("- Facture -").Range("C12").ClearContents
    Sheets("- Facture -").Range("A16:A25").ClearContents
    Sheets("- Facture -").Range("B16:B25").ClearContents
    Sheets("- Facture -").Range("C16:C25").ClearContents
    Sheets("- Facture -").Range("D16:D25").ClearContents
 
    On Error GoTo Num?roUn
    N = Right(Range("A12").Value, 5)
    Range("A12").Value = "F" & Year(Date) & Month(Date) & "-" & Format(N + 1, "00000")
    Exit Sub
 
NumeroUn:
    Range("A12").Value = "F" & Year(Date) & Month(Date) & "-" & Format(1, "00000")
    Resume Next
 
   Worksheets("- Facture -").Range("A12").ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:="C:\Users\mur_a\Documents\Facture.pdf", _
    Quality:=xlQualityStandard, _
    IncludedDocProperties:=True, _
    IgnorePrintAreas:=False, _
    OpenAfterPublish:=False
 
End Sub
Quelqu'un serait-il en mesure de me transformer ce code VBA en un code utilisable sur Google Sheets ?

Merci d'avance de votre aide et de votre compréhension.

Bonne soirée.
Avatar du membre
Sébastien
Administrateur
Administrateur
Messages : 2'044
Appréciations reçues : 203
Inscrit le : 4 décembre 2004
Version d'Excel : 2016 FR
Version de Sheets : FR
Contact :
Téléchargements : Mes applications

Message par Sébastien » 7 octobre 2019, 21:43

Bonjour,

Merci de ne plus poster tes demandes à triple et n'importe où :bof:

Doublons supprimés.

Cordialement,
Sébastien
L
Lionheart13010
Nouveau venu
Nouveau venu
Messages : 3
Inscrit le : 7 octobre 2019

Message par Lionheart13010 » 7 octobre 2019, 21:46

Bonsoir Sebastien,

Je suis nouveau sur le forum et je ne savais pas qu'il était mal vu de poster plusieurs fois le même message.

Toutes mes excuses, je cherche simplement de l'aide pour résoudre mon problème.

Bonne soirée.
L
Lionheart13010
Nouveau venu
Nouveau venu
Messages : 3
Inscrit le : 7 octobre 2019

Message par Lionheart13010 » 11 octobre 2019, 15:32

Merci à toutes et tous pour votre aide !!!
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message