Hirdetés
- Három operációs rendszert kínál a NexPhone
- Bemutatkozott a Poco X7 és X7 Pro
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Samsung Galaxy A56 - megbízható középszerűség
- Honor Magic8 Pro - bevált recept kölcsönvett hozzávalókkal
- Okosóra és okoskiegészítő topik
- Fotók, videók mobillal
- Külföldi prepaid SIM-ek itthon
- Újabb részletes képeken a Google Pixel 10a
- Méretes telekonverter az Oppo Find X9 Ultra hátán
-
Mobilarena
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.
Új hozzászólás Aktív témák
-
lasarus1988
tag
válasz
Fire/SOUL/CD
#8053
üzenetére
Hello,
miután megvannak az adatok amiket kiolvastam, akkor meghívom a hisztogram rutint, hogy készítse el a gyakoriság táblázatot illetve a hozzá tartozó oszlop diagramot.
Application.Run "ATPVBAEN.XLAM!Histogram", ActiveSheet.Range("$A$2:$A$30") _
, ActiveSheet.Range("$B$1"), , False, False, False, FalseActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Source:=Range("'Munka2'!$A$1:$B$7")
ActiveChart.ChartType = xlColumnClustered
ActiveChart.Location Where:=xlLocationAsNewSheet
Sheets("Diagram1").Select
Sheets("Diagram1").Move After:=Sheets(4)
Sheets("Munka1").Select
Range("A1").SelectHa csak megnyitom az xls-t akkor hiba nélkül lefut a program, épp csak a gyakoriság táblázatot nem készíti el, de ha utána manuálisan újra lépésről lépésre megcsinálom, majd újra elindítom a programot, akkor már automatikusan megcsinálja ahogyan kéne.
Köszönöm a segítséget!
Új hozzászólás Aktív témák
- Az elmúlt 30 év legjobb processzorai
- Apple asztali gépek
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Okos Otthon / Smart Home
- Forza sorozat (Horizon/Motorsport)
- TCL LCD és LED TV-k
- A fociról könnyedén, egy baráti társaságban
- Három operációs rendszert kínál a NexPhone
- Nem lát hasznot az AI-ból a cégvezetők többsége
- További aktív témák...
- Lenovo ThinkPad T14 Gen1 Intel i5-10310U Refurbished - Garancia
- MacBook felváráslás!! MacBook, MacBook Air, MacBook Pro
- Samsung Galaxy S21 5G / 6/128GB / Kártyafüggetlen / 12Hó Garancia
- HIBÁTLAN iPhone 13 256GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3732
- Gamer PC-Számítógép! Csere-Beszámítás! I5 6600K / 16GB DDR4 / GTX 1660 6GB / 128SSD + 1TB HDD
Állásajánlatok
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50

