Sujet Précédent Sujet Suivant

Question sur code pour macro CATIA V5

tranbe Messages postés 2 Date d'inscription mercredi 25 août 2004 Statut Membre Dernière intervention 24 mai 2007 - 22 mai 2007 à 15:57
jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 - 24 mai 2007 à 11:38

Bonjour,

je suis en train de customiser pour mon entreprise la macro de catia V5 : SES_Title_Block qui permet de remplir les cartouche et le nomenclature en automatique.

J'ai un soucis dans une partie du code, j'ai le message d'erreur : Indice en dehors de la plage: '[number :1]'

la partie qui pose probleme est en rose :

if sTableType="OneLevel" then
  Do until TextStr.atEndOfStream
  ' search part
   zeile = TextStr.ReadLine
            if (left(zeile,8) = "<a name=") then
       splitFields = l_Split(zeile,HKOMM)
    splitFields1 = l_Split(splitFields(1),":")
    sPartFound = trim (splitFields1(1))
'                msgbox zeile
'                myArray = Split(zeile,":",-1,1)
'                numItems = IBMSplit(splitFields,zeile,":")

                if sPartFound = Trim(sPart) then
'                    msgbox "Got it"
                    zeile = TextStr.ReadLine
                    zeile = TextStr.ReadLine
                    zeile = TextStr.ReadLine
                    zeile = TextStr.ReadLine
                    ' Header lines merken
'                    myHeader = Split(zeile,"|",-1,1)
     do until left(zeile,7) = "</table" or TextStr.atEndOfStream

      zeile = bomRemoveHTML(zeile)
      addBomLine oTable,zeile, bomHeaderMode, userBomProp,partNumbers
                        zeile = TextStr.ReadLine

                    loop
                    exit do
                else
                    zeile = TextStr.ReadLine
                    zeile = TextStr.ReadLine
                end if
            end if

Quelqu'un aurait 'il une idée sur la question ?

D'avance merci

A+

A voir également:

Cartouche catia
Catia vb.net ✓ - Forum VB.NET
VB6 et CATIA V5 - Forum Visual Basic
Vba catia - Forum Visual Basic 6
Catia api - Forum C# / .NET
Macro ouverture et modification fichier draw Catia V5 - Forum Visual Basic 6

3 réponses

Réponse 1 / 3

jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
22 mai 2007 à 16:16

Salut?
Peu etre parce que l'indice 1 de splitFields1 n'existe pas donc que le split n'a rien donné

: Réponse acceptée

Réponse 2 / 3

tranbe Messages postés 2 Date d'inscription mercredi 25 août 2004 Statut Membre Dernière intervention 24 mai 2007
24 mai 2007 à 10:54

comment je peux savoir a quoi correspond splitFields1 ?

Réponse 3 / 3

jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
24 mai 2007 à 11:38

Salut,
Et bien splitFields1 , contient le résultat de la fonction l_Split(splitFields(1),":")

Suffit de comprendre ton code.
@+: Ju£i?n
Pensez: Réponse acceptée

Discussions similaires

VBA CATIA V5 - Récupérer la langue de l'interface utilisateur

Récupérer par une macro les dimension d'une pièce sur CATIA

Gestion des propriétés sous CATIA en VB Script

Catia V5 VBScript

Quelle commande utiliser??? Macro VBA Catia V5

Votre réponse

Discussions similaires