Hirdetés

2024. május 21., kedd

Lapcsaládunk:

Gyorskeresés

Legfrissebb anyagok

Általános témák

LOGOUT.hu témák

Szakmai témák

PROHARDVER! témák

Mobilarena témák

IT café témák

GAMEPOD.hu témák

Útvonal

Fórumok  »  OS, alkalmazások  »  Microsoft Excel topic (kiemelt téma)

Téma összefoglaló

Téma összefoglaló

  • Utoljára frissítve: 2023-11-13 08:31:56

LOGOUT.hu

A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.

Összefoglaló kinyitása ▼

Hozzászólások

(#7778) föccer válasza Delila_1 (#7770) üzenetére


föccer
nagyúr

No, itt a végleges, nálam is hibátlanul futó makró :)

Sub CommandButton1_Click()
Dim AF As AutoFilter
Dim F As Filter
Dim i As Long, usor As Long, C As Long

Sheets("Receptek").Select
Set AF = ActiveSheet.AutoFilter
C = AF.Filters.Count
Range(Cells(2, 1), Cells(2, C)).Value = ""

For i = 1 To AF.Filters.Count
Set F = AF.Filters(i)
If F.On Then
Sheets("Receptek").Cells(2, i).NumberFormat = "@"
Sheets("Receptek").Cells(2, i).Value = F.Criteria1
End If
Next


End Sub

Köszi a segítséget, nélkületek nem lett volna meg. Soakt tanultam belőle. Most jön a következő feladat :)

Üdv, föccer

Építésztechnikus. Építőmérnök.

Útvonal

Fórumok  »  OS, alkalmazások  »  Microsoft Excel topic (kiemelt téma)

Támogatóink

Copyright © 2000-2024 PROHARDVER Informatikai Kft.