Code illisible sans retour à la ligne.
Résoluvaanbasch Messages postés 717 Date d'inscription lundi 28 juillet 2008 Statut Membre Dernière intervention 19 octobre 2024 - 28 juil. 2024 à 11:14
2 réponses
Bonjour
Un simple copier-coller sans mise en forme reproduit son texte:
Sub commission_test()
Dim wk_fichier1 As Workbook
Dim ws_fichier1feuil1 As Worksheet
Dim wk_fichier2 As Workbook
Dim ws_fichier2feuil1 As Worksheet
Dim lstrw As Long
Dim ligne_coller As Long
'définir les variables fichiers et onglets
Set wk_fichier1 = ActiveWorkbook
Set ws_fichier1feuil1 = wk_fichier1.Worksheets(1)
Set wk_fichier2 = Application.Workbooks.Open("\\XXX\Point candidature.xlsx")
Set ws_fichier2feuil1 = wk_fichier2.Worksheets(1)
'identifier dernière ligne colonne A fichier2feuil1
lstrw = ws_fichier2feuil1.Cells(Rows.Count, 1).End(xlUp).Row
ligne_coller = lstrw + 1
'copier coller cellules
ws_fichier2feuil1.Range("A") = fichier1feuil1.Range("A")
ws_fichier2feuil1.Range("B") = ActiveSheet.Range("B")
ws_fichier2feuil1.Range("C") = ActiveSheet.Range("J")
ws_fichier2feuil1.Range("D") = ActiveSheet.Range("Z")
ws_fichier2feuil1.Range("E") = ActiveSheet.Range("L")
End Sub
Ou bien
Utiliser des balises,
ou bien même la touche rapide "Insérer un extrait de code puis coller du "code mis en forme pour la programmation" dedans. (Ctrl + v pour coller).
C'est presque parfait.
Voir les guides de rédaction sur ccm:
https://codes-sources.commentcamarche.net/faq/11288-poster-un-extrait-de-code
int compteur = 0; while (compteur < 10) { printf("Bienvenue sur OpenClassrooms !\n"); compteur++; }
28 juil. 2024 à 09:39
Bonjour,
C'est un bug actuel sur CCM, si pour le code on ne précise pas de langage, il n'y a pas de retour à la ligne https://forums.commentcamarche.net/forum/affich-38068262-bloc-de-code-perd-les-tabulations
28 juil. 2024 à 11:14
Merci Jee Pee pour cette précision :)
28 juil. 2024 à 01:28
Et bien merci :)