- Kábeleket és csövezést rejtő "kirakatház" a GameMax logójával
- Felvarrták az Arctic rackmount rendszerekhez szánt CPU-hűtőjének ráncait
- Háromféle kivitelben, és nem kis kapacitásokkal jönnek a Micron 6550 ION SSD-i
- Már a Samsung sem szolgálja ki modern AI lapkákkal Kínát
- Havazáshoz igazított kiadás kap a Steam Deck OLED
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Mini PC
- Nem indul és mi a baja a gépemnek topik
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Samsung LCD és LED TV-k
- Kormányok / autós szimulátorok topikja
- Internet Rádió építése (hardver), és programozása
- Milyen billentyűzetet vegyek?
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Épített vízhűtés (nem kompakt) topic
-
PROHARDVER!
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
-
Charlie Gordon
aktív tag
válasz Fire/SOUL/CD #8350 üzenetére
Kösz, majdnem teljesen tökéletes. A D oszlop utolsó értékeit kihagyja. Lehet azért mert mindegyik munkalap első sora üres ?
-
félisten
válasz Charlie Gordon #8351 üzenetére
Hali!
Igen, azért. Mindjárt módosítom a kódot.
Fire.
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
félisten
válasz Fire/SOUL/CD #8352 üzenetére
Hali!
Private Sub CommandButton1_Click()
Dim My_Sheet As Worksheet
Dim My_Sheet_Name As String
Dim My_Range As Range
Dim My_Column As String
'Oszlop, amelyikben szállítólevélszámok vannak
'(Ugyanebben az oszlopban lesznek majd, az új munkalapon is)
My_Column = "D"
'Az első adat az oszlopban
My_Row = 2
'A létrehozandó, összesítő munkalap neve
My_Sheet_Name = "FSCD_Összesítés"
Application.DisplayAlerts = False
On Error Resume Next
Set My_Sheet = Sheets(My_Sheet_Name)
On Error GoTo 0
If Not My_Sheet Is Nothing Then
My_Sheet.Delete
End If
Worksheets.Add(After:=Worksheets(Worksheets.Count)).Name = My_Sheet_Name
k = 0
For i = 1 To Worksheets.Count - 1
Worksheets(i).Select
Worksheets(i).Range(My_Column & My_Row).Select
Set My_Range = Worksheets(i).Range(My_Column & My_Row & ":" & My_Column & Worksheets(i).UsedRange.Rows(Worksheets(i).UsedRange.Rows.Count).Row)
My_Range.Select
For Each CurrCell In My_Range
Worksheets(My_Sheet_Name).Range(My_Column & 1 + k) = CurrCell.Value
k = k + 1
Next CurrCell
Set My_Range = Nothing
Next i
Worksheets(My_Sheet_Name).Select
Set My_Sheet = Nothing
Application.DisplayAlerts = True
End SubFire.
[ Módosította: Ndruu ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Charlie Gordon
aktív tag
válasz Fire/SOUL/CD #8353 üzenetére
Nagyon köszönöm !
-
m.zmrzlina
senior tag
Üdv mindenkinek!
Egy karaktersorozatot tartalmazó cella valahanyadik elemét szeretném változóba írni. Mi ennek a legegyszerűbb módja?
köszi
-
félisten
válasz m.zmrzlina #8356 üzenetére
Hali!
Cellában
=KÖZÉP(A1;3;1)Makróban
Valtozo = Mid(Range("A1"), 3, 1)(melyik cella, hányadik karakterétől, hány karaktert)
Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
m.zmrzlina
senior tag
válasz Fire/SOUL/CD #8357 üzenetére
Köszi, működik.
-
perfag
aktív tag
válasz motinka #8345 üzenetére
Mond, mire kell az neked? Csak annyi, hogy nincs meg?
Úgy emlékszem 2007-es Excelben dolgozol. Abba nem tettek Űrlap ikont. A Súgóban van egy ilyen bekezdés: Mi lett az adatűrlappal? Abban leírják hogy tudod a gyorselérési eszköztárra rakni, onnan egy kattintással ki tudod nyitni.
(Remélem nem nyúltam mellé és csak ennyi a gondod.)[ Szerkesztve ]
-
m.zmrzlina
senior tag
Adott egy feladat, amit excelben szeretnék megoldani de nem tudom mi lenne a legjobb megoldás.
Képzeljünk el egy gépet ami mondjuk több lámpát kapcsolgat ki-be és a kapcsolási időpontokat (másodperc felbontással) egy ecxelbe könnyen beilleszthető log-ban rögzíti a következő formátumban:
M TimeStamp Event Params
1 0 2010.09.17 0:01 off green;
2 0 2010.09.17 0:01 off yellow;
3 0 2010.09.17 0:04 on green;
4 0 2010.09.17 0:06 on yellow;
5 0 2010.09.17 0:12 off green;
6 0 2010.09.17 0:12 off yellow;
7 0 2010.09.17 0:13 off red;
8 0 2010.09.17 0:13 on green;
9 0 2010.09.17 0:14 on yellow;
10 0 2010.09.17 0:15 on red;Ezt a formátumot szeretném a könnyebben kiértékelhetővé tenni. Amit én jelenleg az excelről tudok annak alapján az látszik megoldásnak, hogy fölveszek 3 db 86400 cellából álló tartományt (ennyi másodperc van 24 órában) és az elemi cellák háttereit szinezem attól függően pirosra vagy zöldre, hogy az adott lámpa az adott másodpercben on vagy off állapotban volt. Ebből kialakulna három sáv, (lámpánként egy) amin különböző szinekkel látszanának a különböző üzemállapotok.
Kérdésem, hogy van-e erre a feladatra a fent vázoltnál egyszerűbb megoldás ill ki milyen irányba indulna el? Félreértés ne essék, nem kész makrókra számítok hanem elvi iránymutatásra, hogy milyen eszközei van az excelnek ennek a problémának a megoldására.
-
Delila_1
veterán
válasz m.zmrzlina #8361 üzenetére
Feltételes formázás. Olyan színű legyen a cella, mint amelyik lámpa a három közül éppen on állapotban van. Ennyi feltételt a régebbi verziókban is elő lehet állítani.
Ez a színezett cella lehet az, amelyik az időpontot tartalmazza.[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
veterán
válasz m.zmrzlina #8363 üzenetére
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
m.zmrzlina
senior tag
válasz Delila_1 #8364 üzenetére
Kiindulásnak jó az elképzelés, csak nagyon fontos lenne, hogy a működéseket egymáshoz képest is vizsgálni lehessen. Ezért minden lámpa állapotát minden másodpercben (na jó percre kerekítve is jó első körben, az csak 1440 cella) kell látni.
Vannak olyan állapotok amikor nagyon informatív tud lenni az, hogy pl mindhárom lámpa ugyanabban a másodpercben (percben) alszik el vagy gyullad ki. Máskor pont az mond el sokat, hogy "összevissza" kapcsolgatnak.
Ezért kell minden másodperc (perc) állapotát ismerni és kijelezni, ezért gondoltam arra, hogy ha minden időegységnek saját cellája van és a három oszlopot egymás mellé helyezem akkor könnyebben le lehet ellenőrizni hogy pl 12:35:18 mp-kor melyik lámpa mit csinált.
Csak hát 86400 cellát nem egyszerű kezelni. Nekem legalábbis
:-) -
Delila_1
veterán
válasz m.zmrzlina #8365 üzenetére
Kijelölöd az oszlopot, pl. az ábra szeinti F-et, és egyszerre adod meg a feltételes formázást. Fontos, hogy a képletben ne $E$2, hanem $E2, vagy csak E2 szerepeljen.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
félisten
válasz m.zmrzlina #8365 üzenetére
Hali!
Delila_1 megoldása tökéletes alapot nyújt a kivitelezéshez. Annyit kell tenned, hogy a táblázat struktúráját módosítod (az egy adott másodperchez tartozó értékek egymás mellé kerüljenek külön oszlopba, mert most egymás alatt új sorban vannak) illetve ennek megfelelően a feltételes formázást.
Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Delila_1
veterán
válasz m.zmrzlina #8365 üzenetére
Fire ötletével
Szerk.: a karakterek színét is átírhatod. Alapban fehér, a cella "on" értékénél az aktuális szín legyen a feltételes formázásban.
[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
veterán
válasz m.zmrzlina #8365 üzenetére
Na még egy kép, mikor egyszerre is bekapcsolt állapotban vannak egyes lámpák.
(Nem látszik, de ekkor az E oszlop van kijelölve)
[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
veterán
válasz m.zmrzlina #8370 üzenetére
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
bandus
veterán
-
fjanszi123
csendes tag
Sziasztok!
Sormagassággal és oszlopszélességgel kapcsolatban szeretnék segítséget kérni.
Adott egy xls amiben, meghatározott sormagasságok, oszlopszélességek vannak. Ezek a magasságok és szélességek képpontban is meg vannak adva.
Adott xls-ben egyik gépen (xp, office 2003 pro.) 15,00 magasság 20 képpont.
Adott xls-ben másik gépen ( win 7-t 64bit, office 2003 pro.) 15,00 magasság 25 képpont.
Miért van ez a különbség. Ugyan az az oldal beállítás, oldalméret, margó méret.
Xp alatt 1 képpont=0,75 még win 7 alatt 1 képpont=0,6. (win 7 vagy led kijelző lehet a probléma?)
Lehet-e állítani képpontméret nagyságát, ha igen hol?
A válaszokat és ötleteket előre is köszönöm.
Üdv: Jani
-
félisten
válasz fjanszi123 #8374 üzenetére
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Delila_1
veterán
válasz fjanszi123 #8374 üzenetére
A Cellameretek makrót indítva megadhatod a kijelölt cella – cellák szélességét és magasságát mm-ben.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
m.zmrzlina
senior tag
Tettem pár kört a tegnapi témával kapcsolatban (lámpák ki-be) és kövezzetek meg érte (vagy vessetek megvadult mókusok elé) de arra jutottam, hogy az eredeti ötletem mentén indulok el egyelőre perces felbontásban próbálom ábrázolni a ki-be kapcsolás intervallumait Valahogy így fog kinézni:
A-E oszlopokat tudom beilleszteni külső sw-ből. Mivel a kapcsolás idejénél nekem csak a perc:másodperc fontos ezért azt a G1-ben látható fv-nyel képzem. Ha ugyanezt makróban próbálom megcsinálni akkor a következő hibaüzenetet kapom. Nyilván a szintaktikánál szúrok el valamit De mit?
Kis módosítás az érthetőség kedvéért:
A makróban lévő változók Meterlost=OFF, MeterRecovered=ON.
Csak hogy ne kavarjon meg senki hogy más a cella tartalma mint amit a makró keres.[ Szerkesztve ]
-
m.zmrzlina
senior tag
válasz m.zmrzlina #8377 üzenetére
Időközben az előző kérdés nagyban leegyszerűsödött.
Hogyan tudom a mindenkori aktív cella értékét (tartalmát) átadni egy változónak?
-
m.zmrzlina
senior tag
válasz m.zmrzlina #8378 üzenetére
Azt szeretném elérni, hogy az aktív cellában lévő tizedestörtről (aminek a formátuma dátum) leválasszam a napot reprezentáló egészrészt.
Tehát pl a 40438,00128 helyett 0,00128 kerüljön a a változóba.
-
Oly
őstag
válasz Fire/SOUL/CD #7897 üzenetére
Szia
Szerinted miért nem működik, ha a
.From = xy
sort is beszúrom?Üdv
Oly[ Szerkesztve ]
SonyEricsson T20 - T68 - T610 - K700 - W800 - K750 - K800 - C702 - P1 - MOTO Defy - Galaxy S Advance - Galaxy S4 - Lumia 820 - Honor 7 - iPhone 5S
-
bandus
veterán
sziasztok!
ismét adódott egy kis problémám
megint diagrammal szenvedek. kijelölöm az x tengely értékeit, 2003.01.01. kezdeti dátummal 2010 júliusáig. a cellák dátum formátumúak. erre a diagramra ráteszi nekem 2001.01.01-től, de miért fpleg, hogy adataim sincsenek oda, meg semmi, nem értem. és ha át akarom állítani az x tengely minimum értékét, ott csak számokat találok. jelen esetben a minimuma 37000, a maximuma meg 40500. van valakinek ötlete?"a jövötsajnos nemlehet tudni csakhamárotvagy deakormegmár azajelen"
-
perfag
aktív tag
válasz m.zmrzlina #8379 üzenetére
Ha az a változó értéke 40438,00128, akkor:
a = a - Fix(a)
levágja az egész részt. Ha nem vehet fel negatív értéket, akkor aFix() helyett jó az Int() függvény is. -
Delila_1
veterán
A minimum érték 37622 legyen, a maximum pedig attól függően, hogy 2010.júl.1-et, vagy 2010.júl. 31-et akarsz-e befejező dátumnak, 40360, vagy 40390.
Az Excel a dátumokat (is) számként értelmezi, mégpedig úgy, hogy hány nap telt el 1900.01.01. óta az adott dátumig.
A fenti értékeket úgy tudod meg legegyszerűbben, hogy a dátumot tartalmazó cella formátumát általánosra állítod.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
fjanszi123
csendes tag
Üdv újra!
Ötleteket kérnék:
Excelben 12,75-re szeretnék beállítani egy sormagasságot, de ebben az esetben 12,60-ra állítja be magát.
Mi lehet a hibás:
-WIN7-t 64 bit-es op. rendszer
-ati vga driver
-full hd led kijelzőMinden más gépen (xp, win7 32 bit) 12,75 az alap sormagasság excel-ben kivéve nálam, ahol 12,60 és ez sajnos az oldal végére elég jelentős eltérés.
Előre is köszönöm.
Üdv:
Jani -
rTyler
csendes tag
hello
lenne egy osszetett excel "feladvanyom"
van 3000 linkem, soronkent, egymas alatt
link1.link
link2.link
link3.link
link4.link
link5.link
...
link3000.linkvalahogy kellene belole generalnom modositott linkeket (darabonkent 99et), egymas ala, hogy igy nezzenek ki:
link1.link/1
link1.link/2
link1.link/3
...
link1.link/99
link2.link/1
link2.link/2
link2.link/3
...
link2.link/99
link3.link/1
...
...
link3000.link/99tehat a vegen kozel 300k link lenne belole
(tombositheto is mondjuk 50 ezresevel)
belso, ceges hasznalatra kellvan valakinek otlete makrora vagy egyszeru trukkre?
szivesen megteritem az idejet annak, aki tud mukodokepes megoldast[ Szerkesztve ]
-
zsotesz81
senior tag
Hali!
Egy kérdés:
Van egy oszlopom amiben ezek az értékek vannak: 0:00:00 (h:mm:ss formátummal), hogy lehet azt makróval megadni hogy ha ezt az értéket találja a cellában akkor csak símán 0 legyen az értéke? -
xKacsax
aktív tag
Hellosztok! Van két kérdésem... hogyan tudnám azt megcsinálni hogy a Mai dátum pl(2010.10.08) ból a Hónap nevét kapjam eredményül.
2. Kérdés
Azt kellene tudnom hogy hogyan írassam ki ha pl beírom a mezőbe hogy 1000 akkor azt megkapjam szöveges formátumban magyar nyelven hogy "ezer" és ha ezt változtatom akkor 10 millióig lehessen.
remélem érthető voltam, várom az ötleteket. Előre is köszi
Verba volant, scripta manent.
-
m.zmrzlina
senior tag
Továbbra sem vagyok biztos benne, hogy jól értem a feladatot de ha csak azt kell megoldani hogy minden linknek legyen n darab másolata arra két egymásba ágyazott ciklus megfelel.Ezek ugyan nem linkek csak karaktersorozatok és továbbra sem tudom mire kell mutatniuk.
A oszlopban vannak az eredeti linkek, B-K-ban pedig amit a ciklus generált.
-
félisten
válasz xKacsax #8392 üzenetére
Hali!
1. Dátumra formázod (hhhh) azt a cellát, amibe az alábbi képlet kerül
=HÓNAP(MA())2. Olyan dolgot szeretnél megvalósítani, mint számlákon? pl
123456789 esetén -> 123 milló 456 ezer 789 vagy
száz-húszon-három millió négyszáz-ötven-hat ezer száz-húszon-háromFire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Delila_1
veterán
válasz xKacsax #8392 üzenetére
Kilencszázkilencvenkilencmillió-kilencszázkilencvenkilencezer-kilencszázkilencvenkilenc-ig kiírja betűvel az összeget ez a függvény, amit nem én írtam, csak alkalmazom néhanapján.
Function Szam_szoveg(szam As Long) As String
Dim j1, j10, j10a, j100
j1 = Array("", "egy", "kettő", "három", "négy", "öt", "hat", "hét", "nyolc", "kilenc")
j10 = Array("", "tíz", "húsz", "harminc", "negyven", "ötven", "hatvan", "hetven", "nyolcvan", "kilencven")
j10a = Array("", "tizen", "huszon", "harminc", "negyven", "ötven", "hatvan", "hetven", "nyolcvan", "kilencven")
j100 = Array("száz", "", "ezer", "millió", "milliárd")
betu = ""
If szam = 0 Then
Szam_szoveg = "Nulla"
Exit Function
End If
s = Format(szam, "0")
j = 1
While s <> ""
i = Len(s) - 2
If i < 1 Then i = 1
s2 = Mid(s, i, 3)
s = Left(s, i - 1)
s3 = ""
If Len(s2) = 3 Then
s3 = s3 + j1(Asc(Mid(s2, 1, 1)) - 48)
If Mid(s2, 1, 1) <> "0" Then s3 = s3 + j100(0)
s2 = Right(s2, Len(s2) - 1)
End If
If Len(s2) = 2 Then
If Mid(s2, 2, 1) = "0" Then
s3 = s3 + j10(Asc(Mid(s2, 1, 1)) - 48)
Else
s3 = s3 + j10a(Asc(Mid(s2, 1, 1)) - 48)
End If
s2 = Right(s2, Len(s2) - 1)
End If
s3 = s3 + j1(Asc(Mid(s2, 1, 1)) - 48)
If s3 <> "" Then s3 = s3 + j100(j)
If (betu <> "") And (szam > 2000) And (s3 <> "") Then kot = "-" Else kot = ""
betu = s3 + kot + betu
j = j + 1
Wend
betu = UCase(Left(betu, 1)) & Right(betu, Len(betu) - 1)
Szam_szoveg = betu
End FunctionAlkalmazása: a cellába =Szam_szoveg(A1) – ha a szám, amit betűvel akarsz kiíratni, az A1 cellában van.
Azt is tudja, hogy kétezer alatt egybe kell írni az összegeket szöveggel, azon felül a hármas tagolás van érvényben. Állítólag már nem kell nagybetűvel kezdeni, akkor az utolsó előtti sort [betu = UCase(Left(betu, 1)) & Right(betu, Len(betu) - 1)] töröld ki, vagy tedd megjegyzésbe.[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
xKacsax
aktív tag
Köszi a helpet! sokat segítettetek.
Verba volant, scripta manent.
-
Darahian
tag
Helló emberek!
Számomra eléggé WTF kategória a kérdés amit tesóm juttatott el hozzám: excel 2003-ban akart dolgozni az új munkahelyén, ahol az alábbiakkal szembesült: [kép]
A sor ÉS AZ OSZLOP azonosító is szám?!?Ha valaki tudja a megoldást erre az anomáliára, elárulhatná - eddig azt hittem hogy az excel egyik alappillére a betűs oszlopazonosító.
Vagy ez átállítható valahogy?
[ Szerkesztve ]
"Sose higgy el feltétlenül mindent, amit az interneten olvasol!" -Abraham Lincoln
-
félisten
-
Darahian
tag
válasz Fire/SOUL/CD #8398 üzenetére
Köszi!
"Sose higgy el feltétlenül mindent, amit az interneten olvasol!" -Abraham Lincoln
Új hozzászólás Aktív témák
Hirdetés
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- BestBuy topik
- Asszociációs játék. :)
- Mini PC
- Milyen légkondit a lakásba?
- Kínai és egyéb olcsó órák topikja
- Társasjáték topic
- Nem indul és mi a baja a gépemnek topik
- Xiaomi 14T - nem baj, hogy nem Pro
- Budapest és környéke adok-veszek-beszélgetek
- További aktív témák...
Állásajánlatok
Cég: HC Pointer Kft.
Város: Pécs
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest