Új hozzászólás Aktív témák

  • Fferi50
    Topikgazda
    válasz Richard üzenetére #42100

    Szia!
    '"vannak olyan munkalapok ahol egyéb számításhoz szükséges változók és egyebek vannak szintén külön táblában."
    Ha tudod, hogy melyek ezek a munkalapok, akkor a nevük alapján ki lehet hagyni a másolásból:
    Dim mlapnevek as String
    mlapnevek="Munka1,Munka2,Munka5,Munka11"
    For Each sh In Worksheets
       If sh.ListObjects.Count > 0 Then
                 If Instr(mlapnevek,sh.name)=0 Then
                        For Each tbl                   
                               jöhet a folytatás
                         Next
                  End If 

    A vastag sorokat kell beírni pluszba. Az mlapnevek változóba azok a nevek kerüljenek, amely munkalapokról nem kell másolni.
    Üdv.

Új hozzászólás Aktív témák