Vraag : Wat worden de voordelen aan gehad afzonderlijke subnet voor elke VLAN?

Van wat ik begrijp is het gemeenschappelijke praktijk om een afzonderlijke waaier van IP voor elke VLAN te hebben. Wat zijn de voordelen om dit te doen? Welke functionaliteit voegt het subnetting ook een VLAN toe?

Antwoord : Wat worden de voordelen aan gehad afzonderlijke subnet voor elke VLAN?

Probeer dit.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:

Sub x ()
 
Schemerige rng als Waaier, ws als Aantekenvel

Application.DisplayAlerts = Vals

Met Sheet1
    Sheets.Add (). Naam = „temperaturen“
    . Waaier („A1“. Waaier („A“ & Rows.Count). Eind (xlUp)).AdvancedFilter actie: =xlFilterCopy, CopyToRange: =Sheets („temperaturen“). Waaier („A1“), Uniek: =True
     Voor Elke rng in Bladen („temperaturen“). Waaier („A2“, Bladen („temperaturen“). Waaier („A2“). Eind (xlDown))
        Als Juiste UCase ((rng, 5))  <> „TOTAAL“ toen
            Vastgesteld ws = Sheets.Add (na: =Sheets (Sheets.Count))
            ws. Naam = rng
            .AutoFilterMode = Vals
            . Van de waaier („A1“).AutoFilter- gebied: =1, Criteria1: =rng & „*“
            .AutoFilter.Range.Copy bladen (rng. Tekst). Waaier („A1“)
            Bladen (rng. Tekst). Beweging
            ActiveWorkbook.Close SaveChanges: =True, Filename: = " C:\Users\Stephen\Desktop\ " & rng & „.xls“
        Eind als
    Volgende rng
    .AutoFilterMode = Vals
    Bladen („temperaturen“). Schrap
Eind met
     
Application.DisplayAlerts = Waar

Sub van het eind
Andere oplossingen  
 
programming4us programming4us