1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. Visual Basic 6
Sujet Précédent Sujet Suivant

Créer un fichier multipose de donnée

joebardu59 Messages postés 1 Date d'inscription mardi 10 juillet 2012 Statut Membre Dernière intervention 10 juillet 2012 - 10 juil. 2012 à 16:47
ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 - 10 juil. 2012 à 17:47
bonjour,
Je souhaite développer une macro permettant de traité mes fichier de donnée en plusieurs poses.
Je m'explique
Si j'ai un fichier de 20 lignes avec 10 colonnes renseignées
Je souhaite que si je demande à la macro de découpé le fichier en 2 poses
Alors j'obtiens les 10 premières lignes et la 11ème jusqu’à la 20ème ligne à la 11ème colonne jusqu'à la 20ème colonne.
Reprenons si je demande au programme de me faire un fichier en 3 poses, la plus complexe car il ne devra pas couper à la 3ème ligne mais à la 4ème ligne pour faire passé la 5ème ligne jusqu'à 8ème ligne entre 11 ème colonne jusqu'à la 20ème colonne puis la 9ème ligne et 10ème ligne de la 21ème colonne à la 30ème colonne.

Mon programme fonctionne jusqu'ici, Comptage de ligne ok, comptage de colonne ok.
C'est mon premier programme et je surnage à partir de la plus rien ne fonctionne.
Peut-on m'aider ?

Voici mon prog :

Sub Multipose()
'
' Multipose Macro
' Macro enregistrée le 05/07/2012 par Resolutions

Range("A1").Select

' Comptage du nbre de colonne
nbColonnes = Cells(1, Columns.Count).End(xlToLeft).Column
' Compage du nbre de ligne

nblignes = Range("A1").EntireColumn.SpecialCells(xlCellTypeConstants).Count

' dision pour le nombre de pose, création de la variable varpose
varpose = nblignes / 2

MsgBox "Nbres colonnes : " & nbColonnes & " Nbres Lignes : " & nblignes & " " & "le nbres de poses sera : " & varpose

End Sub

2 réponses

Réponse 1 / 2
ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 220
10 juil. 2012 à 16:57
Bonjour,
Commence par nous expliquer ce miracle :
Si j'ai un fichier de 20 lignes avec 10 colonnes renseignées

puis (exemple) :
Alors j'obtiens les 10 premières lignes et la 11ème jusqu’à la 20ème ligne à la 11ème colonne jusqu'à la 20ème colonne

A moins que tu ne veuilles pas découper un "fichier", ni même une feuille, mais que tu veuilles "décaler" des portions de feuille !
C'est quoi, que tu cherches à faire (avec précision) ?

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ
0
Réponse 2 / 2
ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 220
10 juil. 2012 à 17:47
Explique également ce mystère-là :
Si j'ai un fichier de 20 lignes avec 10 colonnes renseignées
Je souhaite que si je demande à la macro de découpé le fichier en 2 poses
Alors j'obtiens les 10 premières lignes et la 11ème jusqu’à la 20ème ligne à la 11ème colonne jusqu'à la 20ème colonne.
Reprenons si je demande au programme de me faire un fichier en 3 poses, la plus complexe car il ne devra pas couper à la 3ème ligne mais à la 4ème ligne


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ
0
Rejoignez-nous