A voir également:
- Comment augmenter automatiquement le n° de facture à chaque fois
- Le fichier contient un programme écrit en python. le programme construit un mot secret mais il ne l'affiche pas. modifiez ce programme afin que à chaque itération de la boucle : la variable a augmente de 2 la variable b diminue de 1 ajoutez une instruction pour faire afficher le mot secret construit. quel est ce mot secret ? ✓ - Forum Python
- Facture ryanair - Forum Consommation & Internet
- Relevé de facturation amazon ✓ - Forum Consommation & Internet
- Site paiement plusieur fois carte nickel forum - Forum Consommation & Internet
- Facture instagram ✓ - Forum Instagram
1 réponse
La macro suivante fonctionne, ajoute un bouton qui l'active sur la premiere feuille de ton classeur et nomme la deuxième feuille avec le numéro de facture que tu souhaite avoir. Cela ne fonctionne que pour des feuilles qui portent des numéros de facture sans lettres.
Sub Macro1()
'
' Macro1 Macro
'
Dim numeroFeuille As Integer
numeroFeuille = Sheets(Sheets.Count).Index
Dim numeroFacture As String
numeroFacture = Sheets(Sheets.Count).Name
If IsNumeric(numeroFacture) Then
numeroFacture = CInt(numeroFacture)
Sheets.Add After:=Sheets(Sheets.Count)
Sheets(Sheets.Count).Activate
ActiveSheet.Name = numeroFacture + 1
Else
MsgBox ("Le nom de la derniere feuille n'est pas un nombre.")
End If
End Sub
Sub Macro1()
'
' Macro1 Macro
'
Dim numeroFeuille As Integer
numeroFeuille = Sheets(Sheets.Count).Index
Dim numeroFacture As String
numeroFacture = Sheets(Sheets.Count).Name
If IsNumeric(numeroFacture) Then
numeroFacture = CInt(numeroFacture)
Sheets.Add After:=Sheets(Sheets.Count)
Sheets(Sheets.Count).Activate
ActiveSheet.Name = numeroFacture + 1
Else
MsgBox ("Le nom de la derniere feuille n'est pas un nombre.")
End If
End Sub
