Hoppa till huvudinnehåll

Hur listar jag alla Excel-filers egenskaper i ett ark?

Författare: Sun Senast ändrad: 2024-08-16

I den här artikeln introducerar jag en VBA-kod för att lista alla egenskaper för den aktiva arbetsboken i ett ark.

1. Tryck Alt + F11 för att aktivera Microsoft Visual Basic for Applications-fönstret.

2. klick Insert > Modulernaoch klistra in under koden i den tomma modulen.

VBA: Lista alla egenskaper

Sub WBProperties()
'UpdatebyKutools20191031
    Dim xWB As Workbook
    Dim xF As Long
    Dim xStr As String
    Dim xWSh As Worksheet
    On Error Resume Next
    Application.DisplayAlerts = False
    xStr = "Workbook Properties"
    Set xWB = Application.ActiveWorkbook
    Set xWSh = xWB.Worksheets.Item(xStr)
    If Not xWSh Is Nothing Then
        xWSh.Delete
    End If
    Set xWSh = xWB.Worksheets.Add
    xWSh.Name = xStr
    xWSh.Range("A1").Value = "Property"
    xWSh.Range("B1").Value = "Value"
    With xWB
        For xF = 1 To .BuiltinDocumentProperties.Count
            xWSh.Range("A65536").End(xlUp).Offset(1, 0).Value = _
            .BuiltinDocumentProperties.Item(xF).Name
            xWSh.Range("A65536").End(xlUp).Offset(0, 1).Value = _
            .BuiltinDocumentProperties.Item(xF).Value
        Next xF
    End With
    Application.DisplayAlerts = True
End Sub

kopiera och klistra in vba-koden i modulen

3. Tryck F5 nyckel för att köra koden har ett nytt ark med namnet Egenskaper för arbetsbok skapats framför det aktiva arket, som visar alla egenskaper för den aktiva arbetsboken.



Annan verksamhet (artiklar)

Inaktivera tillägg vid start av Excel
Du kan ha installerat några tillägg i din Microsoft Excel, men nu måste du inaktivera ett angivet tillägg vid start av Excel. Hur löser man detta problem? Metoden i den här artikeln kan hjälpa dig.

Exportera och spara varje kalkylblad som separat ny arbetsbok i Excel
Låt oss säga att du vill exportera och spara ett eller flera kalkylblad som en ny arbetsbok, hur ska du hantera det? Normalt kan du kopiera varje kalkylblad och klistra in i en ny arbetsbok. Men här ger vi dig några praktiska knep för att hantera det:

En VBA-kod för att lista alla tillägg i Excel
I Excel kan du lägga till eller infoga några tillägg för bättre hantering av data. Som vi vet kan vi gå till alternativfönstret för att se alla tillägg, men finns det något sätt att lista alla tillägg i ett ark?


  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner och förvaring av data; Delat cellinnehåll; Kombinera duplicerade rader och summa / genomsnitt... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Favorit och sätt snabbt in formler, Intervall, diagram och bilder; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Gruppering av pivottabell efter veckonummer, veckodagen och mer ... Visa olåsta, låsta celler av olika färger; Markera celler som har formel / namn...
kte-flik 201905
  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
officetab botten