Vraag : commentaar SP

wanneer u leidt tot SP, hoe is het bekwaam levensonderhoud de commentaar vóór de CREATE verklaring, ook?

thanks

Antwoord : commentaar SP

O.K., om de genoemde waaier aan een extern werkboek te plaatsen, probeer deze code:

Ben zeker om filepath in waar te veranderen uw „ACA Week x“ de werkboeken in deze lijn worden gevestigd:

filePath = „C:\“
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:

Sub CreateNamedRangesExtWbk ()
'Cre�ër Genoemde Waaier in Extern Werkboek
    
    Verduister wb als Werkboek
    Verduister filePath als Koord
    Verduister currentWbk als Koord
    
    filePath = „C:\“
    
    Application.ScreenUpdating = Vals
    currentWbk = ActiveWorkbook.Name
    
    Voor I = 1 tot 52
        Vastgesteld wb = Workbooks.Open (filePath & „ACA Week“ & I)
        Werkboeken (currentWbk). Names.Add noem: = " Staarten " & I, RefersTo: =wb. Aantekenvellen („TailAvailability“). Waaier („6: $R$204“)
        wb. Dichte Vals
        Vastgesteld wb = niets
    Daarna

    Application.ScreenUpdating = Waar
    
    MsgBox „Genoemde Waaiers is geplaatst!“

Sub van het eind
Andere oplossingen  
 
programming4us programming4us