- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Samsung Galaxy XCover7 Pro - burokban született One UI
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Google Pixel topik
- Milyen GPS-t vegyek?
- Samsung Galaxy S21 FE 5G - utóirat
- One mobilszolgáltatások
- Okosóra és okoskiegészítő topik
- Egy szenzor, két zoomkamera: újraírta a Huawei a mobilfotózás történetét
- Redmi Note 13 Pro 5G - nem százas, kétszázas!
-
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
-
#8698
Fire/SOUL/CD
félisten
Fire/SOUL/CD
#8693
válasz
Fire/SOUL/CD
#8693
üzenetére
Szóval egy "kicsit" másabb lett a makrókód, így egy az egyben beillesztheted a PH-ra való hozzászólásod folyamán.
Function GetLinkAddress(MyCell As Range) As String
GetLinkAddress = "[L:" & _
MyCell.Hyperlinks(1).Address & _
"]" & _
MyCell.Value & _
"[/L]"
End FunctionA Function az visszaad valamilyen értéket, ez esetben STRING-et, azaz amelyik cellából meg van híva, annak a cellának a tartalma megváltozik, mint egy hagyományos pl SZUM esetén...
-
#8697
atesss
addikt
Fire/SOUL/CD
#8693
atesss
addikt
válasz
Fire/SOUL/CD
#8693
üzenetére
Köszi
A szűkítést nem autoszűrővel oldottam meg, hanem sorbarendezéssel (+hogy a Gold legyen az elején, beszúrtam egy "=HA(H2="GOLD";1;0)"-s oszlopot), hogy benne legyen a többi is egyben, csak a szükségesek legyenek az elején.
A makrótól elsőre féltem, de aztán egész könnyen meg tudtam oldani.Jó néhány éve használtam VB-t egész alap szinten.
De azóta csak C-t és (ebben a félévben) Assembly-t. Hát azért a C-hez képest eléggé más a szintaktika...
Az Excelben mindenképp rá kell menni a "Új makró rögzítése"-re ?
Illetve mi a különbség a "Sub" és a "Function" közt ?
Mert nekem furcsa hogy csak így megy, hogy a "Sub" le van zárva, és nem benne van a "Function":Sub GetLink()
End Sub
Function GetLinkAddress(MyCell As Range) As String
GetLinkAddress = MyCell.Hyperlinks(1).Address
End FunctionDe egymásba ágyazva nem engedi.
-
#8696
Fire/SOUL/CD
félisten
Cuci3
#8695
-
Cuci3
tag
Összesen 6 találat, miért is írunk erre kódot?
Amúgy lentebb a lehetőség, a feltételeket remélem jól adtam meg. 
Sub hiperlink_kiszedes()
Application.ScreenUpdating = False
i = 2
For Each h In Worksheets(1).Hyperlinks
If Cells(i, 4) = 300 And Cells(i, 7) > 0.8 And Cells(i, 8) = "Gold" Then
Cells(i, 9) = h.Name
Cells(i, 10) = "[L:" & h.Name & "][link][/L]"
End If
i = i + 1
Next
Application.ScreenUpdating = True
End Sub -
#8693
Fire/SOUL/CD
félisten
atesss
#8692
Autószűrővel szűkítheted a táblázatod, majd egy makróban írt szubrutin segítségével kinyered a linkek címét.
Makrókód
Function GetLinkAddress(MyCell As Range) As String
GetLinkAddress = MyCell.Hyperlinks(1).Address
End FunctionRáállsz az I2-es cellára és =GetLinkAddress(B665)
(Azért B665 szerepel itt, mert a szűrések következtében a B oszlopban ez az első sor)Aztán hagyományosan, egérrel lemásolod a képletet. Mindez képben
-
atesss
addikt
Üdv !
A következő problémában kérném a segítségeteket:
Innen letöltöttem ezt a 80+-os tápegységek adatát tartalmazó táblát: [link] ("Export to Excel").
Ebből keresném a 300W alatti, 80+ Gold-os modelleket.
Sikerült is megoldanom a megfelelő sorbarendezést, most már a Gold-ok vannak elöl, és azon belül W szerint sorbarendezve.
Ezt szeretném pl. "PH-kompatibilissé" tenni, azaz be tudjam szúrni a tábla egy részét a fórumra, a linkekkel együtt.
Ugye a Modell Number egyben link is, de ezt sehogy nem sikerült kinyernem belőle, még Excelen belül sem hajlandó egy új cellába másolni.
Utána meg hozzátenném a linkekhez a megfelelő kódot (["L:http://a.com/b.html][link][/L"]), ez már egyszerű lenne.
Excel 2003-am van. -
#8691
lazlo8
tag
Fire/SOUL/CD
#8685
lazlo8
tag
válasz
Fire/SOUL/CD
#8685
üzenetére
igen, én voltam a hunyó tényleg írtad már a dátumos- elmentést, és sikerült is elmenteni ! nagyon szuper köszönöm a segítségeteket!
Viszont még fennáll 1 basic-problémám:
van egy "makróm" ami több másik kisebb excel-ből szedi az adatokat. nevezzük ezeket forrás file-oknak. A master file tartalmaz 50 fület ez a makró ezt az 50 fület tölti fel több kisebb nagyobb forrás fileokból. A forrás file-ok szintén 50 fület tartalmaznak de abból csak 10-5-20 fül van kitöltve a többi fülnél az eredmények üresek (random hogy melyik forrás file-ba hány fülnyi adat van).
a problémám az hogyha lefuttatom a makrómat pl. arra az excel file-ra ami 20 fület tartalmaz tök jól működik. De aztán lefuttatnám a másik forrás file-ra ami mondjuk csak 10 fület tartalmaz akkor nem 30 fülnyi eredményem lesz, hanem csak 10 mert felülírja az első 20-at.(0-val)
a makróm ugy néz ki hogy 1 cella hivatkozik a forrás file cellájára. semmi képlet v nehézség nincs.
hogy/mivel lehetne ezt a problémámat megoldanom? HA fv-vel?A 0-is jó eredménynek számit, a megoldás az lenne hogyha lefuttatot az első forrás file-ra a makrót az behúz 20 fülnyi jó adatot. utána ehhez a 20 fülhöz nem kellene hozzányúlni a maradék 30-at töltse ( viszont egy kérdés a forrás file-ban vagy egy mező ami üres értéket tartalmaz a makróm viszont minden alkalommal 0-as értéket ad ez mitől lehet?). de random ez is tehát ma az első forrás file-ba 20 fülnyi értékes adat volt, lehet holnap csak 2 fülnyi lesz holnapután meg 0 és csak a 2.-ik forrás file-ban lesz adat.
tehát a 0 és üres mező-t meg kell különböztetni. Vagyis lehet ha egyszerűbb lenne ha a makróm üres mezőre üres mezőt húzna be(ezt hogy? vagyis most miért üres mezőre 0-at hoz be? (bár most találtam egy olyan mezőt ami a forrás file-ban üres és a master-ben is az ez mitől lehetséges? a hivatkozás képlet ugyanaz csak a változók mások pl. lapfül neve) nem pedig 0-at és akkor, ha újra lefuttatom a makrómat akkor az üres mezőket töltse fel?
köszönöm még1x mindenkinek a segítséget -
#8689
Fire/SOUL/CD
félisten
Satchmo7
#8688
válasz
Satchmo7
#8688
üzenetére
[link](Az Ebooks ajánlat nem él már)
Továbbá van egy nagyon hasznos fájl is alapban minden excelben, a neve FUNCS.XLS
Az, hogy ez a fájl pontosan hol található, az függ az OS és az Office változattól, itt az x86 vagy x64-es változat értendő. Nálam (W7 x64 és az Office 2010 x64) itt található.C:\Program Files\Microsoft Office\Office14\1038\
A fent említett munkafüzetben megtalálható magyarul és angolul az összes függvény, ami azért nagyon hasznos, mert makróban mindig az angol függvénynevekkel lehet csak dolgozni és jól jöhet, ha egy magyar függvénynek nem tudod az angol nevét.
Amiket ajánlottam, nem makróprogramozási tutorialok, de nélkülözhetetlen segítség hozzá
-
#8688
Satchmo7
csendes tag
m.zmrzlina
#8675
Satchmo7
csendes tag
válasz
m.zmrzlina
#8675
üzenetére
Köszönöm a választ m.zmrzlina és Cuci3!
Villamosmérnök vagyok szóval a programozás nem áll messze tőlem de a suliba C-t meg Assembly-t tanultunk de a munkámba most makrókat kellene írnom, egyelőre nézegetem amiket küldtetek és nem megyek tanfolyamra. Ha még valakinek van ötlete milyen könyvvel induljak vagy online forrás azt nagyon megköszönöm.
-
#8687
Fire/SOUL/CD
félisten
Delila_1
#8686
válasz
Delila_1
#8686
üzenetére
1. Őszintén szólva nem is gondoltam arra, hogy lazlo8 hsz-ában az első kérdése, az a másodikban szereplő makróra vonatkozik
2. Az adott pdfcreator-os kódban ez meg letudva(ciklusba van szervezve)
Csak infóként: 2007/2010-es Office-ban létezik PDF Add-In, illetve enélkül is lehet PDF-be menteni, ha telepítve van Acrobat Reader...Ez esetben maga a VBA is ad lehetőséget rá...
-
#8686
Delila_1
veterán
Fire/SOUL/CD
#8685
Delila_1
veterán
válasz
Fire/SOUL/CD
#8685
üzenetére
Az 50 lap nyomtatását mindenképp ciklusba szervezném, akkor nem szükséges megfelezni a makrót.
-
#8685
Fire/SOUL/CD
félisten
lazlo8
#8684
1. Igen, szedd szét.
2. Nem tudom, melyik pdfcreatort használod(van jó pár), ezért ezt a pdf creatort töltsd le és telepítsd(miután a jelenlegit uninstaláltad), aztán tanulmányozd ezeket a kódokat.
(Azt, hogy hogy lehet fájlnevet létrehozni, (ami tartalmazza a pl dátumot), azt meg korábban megválaszoltam, csak szerintem átsiklottál rajta...Olvass vissza...
-
lazlo8
tag
bocs, h megint sokat irok de lenne par kerdesem.
1,
tul hosszu a makro
compile error: procedure too large
lementettem txt-be 111kb.
szedjem ketté?
2.
hogyan lehet xls-ből pdf. jelenleg office 2003-at és pdf creatort használok igy néz ki a " makróm":
Sub Macro1()
'
' Macro1 Macro
' Macro recorded 19/11/2010 by mackoka''
Sheets("Sheet2").Select
Cells.Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Sheet3").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Sheet4").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
......
Sheets("Sheet50").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=TrueEnd Sub
ugye jelenleg xls.ből pdf-be nyomtatok nem konvertálok. végülis nekem mindegy hogy pdf-be nyomtatok vagy a konvertálok a végeredmény pdf kell h legyen.
idáig elég jó a makró a problémám az hogy mivel gondolom a pdf creator nem office termék ezért mindig a felhasználótol kérdi meg hogy hova milyen néven menste el az adott munkalapot, ezt hogy lehetne automatizálni hogy a tomi+ lapfül nevet meg pl dátumot adja pdf névnek?
nem tudom a pdf creator a megfelelő szoftver hogy excel makró segítségével pdf-t készítsek ha nem, mondjátok meg mi
3, -
#8681
Fire/SOUL/CD
félisten
Cuci3
#8680
A 2000-től a 2007-es Office-ig bezárólag, 6.0-ás VBA "motort használ", azonban ezen azonosság ellenére vannak olyan programozástechnikai eltérések (elsősorban pl deklarálásokban, függvényhívásokban), amikre oda kell figyelni és ez 2003 vs. 2007-re is igaz. A 2010-es Office már 7.0-ás "motort használ", ami alapvetően kompatibilis teljesen a 6-ossal, csak kibővített funkciókkal rendelkezik és ami nem mellékes, ugye a 2010-es Office x64-es változatban is elérhető.
-
Cuci3
tag
válasz
Satchmo7
#8673
üzenetére
Én ezen tanultam:
link
De persze van 1-2 kezdő honlap is, pl:
link1
link22003 és 2007 között asszem van különbség, de nem nagy (viszont lehet debugolni, ha vált az ember
). És szerintem mindkettő 6.0-t tolja, de majd ezt mások, az okosabbak megfejtik.
És ha van alap affinitás és programozási ismeret, akkor nem kell tanfolyam. -
#8679
Fire/SOUL/CD
félisten
Mike318
#8678
válasz
Mike318
#8678
üzenetére
Biztos, hogy a korábbi kódodban az END-el van a gond? Az END-nek simán működnie kell és azt is csinálja, amit szeretnél, azaz teljesen mindegy, hogy a macron belül hol van meghíva az END, megállítja a macro futását és teljesen visszaadja a vezérlést az Excelnek...
Pl az alábbi kód i=3 esetén "leáll", a ciklust követő sorig nem jut el.Private Sub CommandButton1_Click()
For i = 1 To 100
If i = 3 Then
End
End If
Next i
MsgBox (i)
End SubUI: A z excelből való teljes kilépés meg Application.Quit
-
Mike318
csendes tag
Sziasztok! Úgy látom, az End operátorral kapcsolatos problémám nem másnál nem jelentkezik
. A VBA-ban pont az a lazaság tetszett meg nekem, hogy nem kell szigorúan visszavezetni az alprogramok meghívását visszafelé a legelsőig, mint régen a FORTRAN-ban vagy a C++ ban csináltam, bárhol ki lehetett lépni. Most úgy látszik, megint rendet kell tanulnom ![;]](//cdn.rios.hu/dl/s/v1.gif)
. -
Gimre
csendes tag
Segitséget szeretnék kérni abban, hogy mivel mi minden héten 1x focibajnokságot szervezünk (XBOX360) és általában 4-5-n játszunk csoportokba bontva mindenki mindenkivel és szeretném excel táblázatban összefoglalni, hogy ki mennyi gólt rúgott ill. kapott nem tom hogy milyen függvénnyel kel ezt meg csinálni.
Ilyen csoportokban játszunk Pl: a-b, a-c, a-d, a-e utána meg b-c, b-d, b-a, b-e stb tehát mindenkinek van hazai meccse szoval ebben kérném a segitséget.
Előre is köszönöm
-
#8675
m.zmrzlina
senior tag
Satchmo7
#8673
m.zmrzlina
senior tag
válasz
Satchmo7
#8673
üzenetére
Az hogy mennyit kell rákölteni (kell-e egyáltalán) az attól függ hogy milyen szintre mennyi idő alatt akarsz eljutni és hogy honnan indulsz.(vannak-e programozási alapismereteid)
Szerintem ez két nagyon jó könyv. Én is kezdő vagyok és nagyon sokat segítettek már. Nem tudom hogy magyarul megjelentek-e.
http://www.amazon.com/Excel-Power-Programming-Spreadsheets-Bookshelf/dp/0470044012
http://www.amazon.com/Excel-2007-Bible-John-Walkenbach/dp/0470044039excelHa meg konkrét kérdésed van küldd ide, segítőkész emberek vannak itt.
-
Satchmo7
csendes tag
Sziasztok!
Bele szeretném magam vetni az excel makró programozásba ehhez tudtok ajánlani nekem valami jó könyvet vagy online forrást? Mit tanácsoltok hol, hogyan kezdjem el? Érdemes-e befizetni valamilyen tanfolyamra 50-60e Ft-ért? Mennyi idő megtanulni közepes,haladó szinten? Van-e különbség hogy excel 2003 vagy 2007 mindegyik VIsual Basic nyelvet használ azon belül 6.0 vagy. NET?
Köszönöm és bocs ha sok a kérdés
-
#8672
iwu
addikt
m.zmrzlina
#8671
iwu
addikt
válasz
m.zmrzlina
#8671
üzenetére
KÖSZÖNÖM!!!
-
#8671
m.zmrzlina
senior tag
iwu
#8670
m.zmrzlina
senior tag
Az én megoldásomban a
Columns("A:B").EntireColumn.AutoFit
helyett ezt:
With Columns("A:B")
.Select
.EntireColumn.AutoFit
.HorizontalAlignment = xlLeft
End Withbetenni.
Ja és a
activerow = Range("A" & sorsz + 1, "I" & sorsz + 1).Value
sort törölni. Nem létező változónak ad értéket majd nem használja semmire.
Mire észrevettem, hogy benne maradt már nem volt szerkeszthető a hsz. -
-
#8668
m.zmrzlina
senior tag
iwu
#8661
m.zmrzlina
senior tag
Nekem ezt sikerült kiötleni:
Sub valogat()
Dim sorsz As Integer
Dim holavege As Integer
Sheets("Munka1").Select
Cells(Rows.Count, 1).End(xlUp).Select
holavege = ActiveCell.Row
For sorsz = 1 To holavege - 1
Sheets.Add After:=Sheets(Sheets.Count)
Sheets(sorsz + 1).Name = Sheets(1).Cells(sorsz + 1, 1).Value
Sheets("Munka1").Select
Range("A1:I1").Select
Selection.Copy
Sheets(1 + sorsz).Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Sheets("Munka1").Select
Range("A" & sorsz + 1, "I" & sorsz + 1).Select
activerow = Range("A" & sorsz + 1, "I" & sorsz + 1).Value
Selection.Copy
Sheets(1 + sorsz).Select
Cells(1, 2).Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Columns("A:B").EntireColumn.AutoFit
Next sorsz
Sheets("Munka1").Delete
ActiveWorkbook.SaveAs "C:\Documents and Settings\agb\Dokumentumok\masneven.xlsm"
End SubAbból a munkafüzetből indul ahol a kiindulási lista van, elkészíti a munkalapokat igény szerint, majd törli az eredeti lista munkalapját és menti a munkafüzetet más néven.
Nem egy minden részletében kimunkált végleges megoldás inkább csak gondolatébresztő, de működik.Érdekelnének a szakértő vélemények.
-
Delila_1
veterán
Régen leveleztünk, biztos a régi címemmel próbálkoztál. Inkább beírom ide a kódot. A füzetet, amiben most 1 lapon vannak az adatok, Eredeti.xls-nek neveztem el, az újat, amit a makró hoz létre, UjFuzet.xls névvel illettem.
Az útvonalat az első sorban írd át.Sub SokLap()
Const utvonal As String = "F:\Eadat\"
Dim lapsz As Integer, lap As Integer
Dim lapnev As String
lapsz = Range("A" & Rows.Count).End(xlUp).Row
Application.SheetsInNewWorkbook = lapsz - 1
Workbooks.Add
ActiveWorkbook.SaveAs Filename:=utvonal & "UjFuzet.xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
Windows("Eredeti.xls").Activate
For lap = 2 To lapsz
lapnev = Cells(lap, 1)
Workbooks("UjFuzet.xls").Sheets(lap - 1).Name = lapnev
Rows(1).EntireRow.Copy Workbooks("UjFuzet.xls").Sheets(lapnev).Rows(1)
Rows(lap).EntireRow.Copy Workbooks("UjFuzet.xls").Sheets(lapnev).Rows(2)
Next
Windows("UjFuzet.xls").Activate
For lap = 1 To lapsz - 1
Sheets(lap).Select
Range("A1:I2").Copy
Range("A3").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Rows("1:2").Select
Selection.Delete Shift:=xlUp
Range("A1").Select
Next
Application.SheetsInNewWorkbook = 3
End Sub -
-
Mike318
csendes tag
válasz
Delila_1
#8658
üzenetére
Na itt vagyok. Szóval a program végén egy SELECT CASE konstrukcióban minden ág hasonlóan végződik
Workbooks(fofnev).Save
Workbooks(akteladfajl).Close SaveChanges:=True
If hiba = 1 Then Workbooks(fofnev).Save
hiba = 0Workbooks(tfnev).Close SaveChanges:=True
Workbooks(dfnev).Close SaveChanges:=FalseEnd ' kilépés a programból
Case 2
...........stb.Erre minden esetben a Nem megfelelő funkció! üzenet jön.
-
iwu
addikt
válasz
Delila_1
#8660
üzenetére
nah, parádé! de hát nem is gondoltam volna, hogy nem
nah, be ctrl-v-ztem a tábla első 2 sorát.egy pc leltár. ennek a táblázatnak van jópár sora.
Az kellene nekem, hogy ebből a táblából készülne egy olyan új excel tábla, aminek a sheet nevei a Computer nevű oszlopban találhatóak, és minden sheetben a computer adatai (neve ism valamint az oszlop név) megjelenne 1-1- cellában egymás alatt.Computer Domain OSname Description Manufacturer Model Clockspeed Memory Disk
Fileserver bubuka Win 2003 Server_BP2 ASUS A7V400-MX 1992 1024 48tehát ebből lenne egy olyan shhet, aminek a neve Fileserver, és a tartalma
Computer: Fileserver
Domain: Bubuka
Osname: win2003
.
..
...thx, előre is:iwu
-
Mike318
csendes tag
Sziasztok! Ma találkoztam először ezzel a lehetőséggel, hogy így kérhetek segítséget a munkámhoz, szeretnék élni vele. A "Megosztásütközés miatt nem lehet menteni a fájlt... " probléma nyomait kutatom, a #6599-s HSZ-ban felmerült, így akadtam ide, de nem volt rá válasz. A raktárkezelő és számlázó programot még Excel97-ben kezdtem írni, 2003-s alatt frankón ment évekig, most cseréltünk gépet, Windows 7 + Excel2007, azóta megkeseríti az életemet ez a hiba. 10-12 fájlt mozgatok egy eladási folyamatban, és véletlenszerűen bármelyiket hirtelen egy mentésnél átnevezi egy számokból álló névre és megáll a tudomány. Tud valaki erre megoldást?
Méd csak 200 HSZ-t érkeztem elolvasni, de mély tiszteletem a GURU-k tudásának! -
#8654
Fire/SOUL/CD
félisten
zagoston
#8653
válasz
zagoston
#8653
üzenetére
Még annyit akkor, hogy ha ezt úgy akarod megoldani, hogy elkészítesz egy munkafüzetet, levéded a lapokat majd ezt usereknek oda lesz adva, akkor gondoskodni kell arról, hogy a userek ne láthassák a macro kódját, hisz akkor onnan kileshetik a jelszót, aztán simán módosítják a cellákat.
Ezt a VBA editorban így lehet levédeni
Tools menü/VBAProject Properties/Protection fül/Lock project for viewing elé pipa, jelszó megad. [link] -
#8653
zagoston
csendes tag
Fire/SOUL/CD
#8652
zagoston
csendes tag
válasz
Fire/SOUL/CD
#8652
üzenetére
Nagyon szépen köszönöm a gyors megoldást!
-
#8652
Fire/SOUL/CD
félisten
zagoston
#8651
válasz
zagoston
#8651
üzenetére
Tudtommal Excelből csak egyesével lehet ki- és bekapcsolni a lapvédelmet, de makróval megoldható, hogy az összeset levédd. Az első kód bekapcsolja(jelszóval védve), míg a második meg feloldja a lapvédelmet, az összes munkalapon
Private Sub CommandButton1_Click()
For i = 1 To Sheets.Count
Sheets(i).Activate
ActiveSheet.Protect Password:="FSCD"
Next i
Sheets(1).Select
End Sub
Private Sub CommandButton2_Click()
For i = 1 To Sheets.Count
Sheets(i).Activate
ActiveSheet.Unprotect Password:="FSCD"
Next i
Sheets(1).Select
End Sub -
zagoston
csendes tag
Sziasztok!
Lenne egy problémám, amire egy itt edződött, jól felkészült Guru talán tud megoldást.
A munkahelyemen olyan excel táblákkal dolgozunk, amiknek több munkalapja is van.
A munkalapok ugyanazok, viszont lapvédelemmel vannak ellátva.A kérdésem az lenne, hogy van-e lehetőség egyszerre több munkalapon is módosítani a lapvédelmet...
Tehát adott esetben az összes munkalapról levenni ill. feltenni.Előre is köszönöm!
Üdv
-
#8650
Fire/SOUL/CD
félisten
kwd
#8649
Korábban nem volt szó ugyan VLOOKUP-ról, de végül is lényegtelen, mert a szöveg->általános vagy fordított konverzió nem okozhat ilyen jelenséget. Valami nem kerek Nálad...Itt van 2 példa egy hagyományos és egy makrós megoldás, talán segít kideríteni, hogy nálad mi lehet a gond.
(Az A1:A4 tartományt elneveztem Adatok-nak...)Makró
Private Sub CommandButton1_Click()
Dim MyFxs As WorksheetFunction
Set MyFxs = Application.WorksheetFunction
Dim MyRange As Range
Set MyRange = Sheets("Munka1").Range("Adatok")
On Error Resume Next
Result = MyFxs.VLookup("A456", MyRange, 1, False)
If Err.Number <> 0 Then
MsgBox ("Nincs ilyen elem: " & Result)
Else: MsgBox ("Található ilyen elem: " & Result)
End If
End Sub -
#8649
kwd
csendes tag
Fire/SOUL/CD
#8644
kwd
csendes tag
válasz
Fire/SOUL/CD
#8644
üzenetére
hát amig szövegen van #N/A-kat hoz a vlookup. ha át alakitom generálra és végig katogatom vagy egérrel vagy F2-vel akkor nagyon szépen mennek a függvények.
Az okot nem ismerem, de tudom, hogy így szoktam megoldani. Sajnos már van amikor 1000 és fölötte lévő sorokról van szó ezért szeretném egyszerüsíteni és gyorsítani az "eljárást".
-
Cuci3
tag
Office 2007-tel még mindig nem volt se időm, se kedvem megismerkedni, de mi lenne ha nem 1/0-kat raksz az cellákba, hanem 1/üres értékeket. Vagy másképp: 1/0-t bedobod, majd a 0-s cellákból az értéket kitörlöd.
Azáltal a 0-ba való leugrás megszűnik. Esetleg lehet még alkalmazni a Beállítások / Esésvonalak funkciót a vonalakon való jobb klikk után. És persze mindez 2003 alatt volt. -
#8647
rekid
addikt
Fire/SOUL/CD
#8644
rekid
addikt
válasz
Fire/SOUL/CD
#8644
üzenetére
Dupla.
perfag:
Ö excelben kérik az adatokat. Azt tudjak kezelni. En meg azt nem. 
ezek szerint.. -
#8646
rekid
addikt
Fire/SOUL/CD
#8644
rekid
addikt
válasz
Fire/SOUL/CD
#8644
üzenetére
Pl. Alsó két vonal ott mindketto 0-ban van végig.
Tenyleg, exel 2007 ben tudok valahogyan a diagrammon nagyitani? Itt pl kijelolom egy részét a diagramnak es kinagyitja, excelben meglehet ezt igy oldani?
Felreertes ne essek nem fikazni szeretnem az office-t csak nem tudom van e ra lehetőseg mert eddig nem talaltam. Olyat igen (jobb also sarok hogy komplett nézetet nagyit de ugye az nem ugyanaz. ) -
perfag
aktív tag
-
#8644
Fire/SOUL/CD
félisten
rekid
#8642
-
rekid
addikt
válasz
Delila_1
#8640
üzenetére
Mert az a probléma megkerülése nem pedig a megoldása
Persze ha nincs más marad ez.Fire/Soul/CD:
Sajnos ez a megoldás nem jo nekem. Gyakorlatilag arrol van szo hogy van több hőtermelőd egy rendszerben amellyel tartályokat fűtesz fel és nekem idoben látnom kell hogy adott homersekletnel melyik hotermelo volt bekapcsolva es meddig. De ugye a be/ki kapcsolast 0-1 el irod le. A vicc az hogy linux alatt egy gnu plottal siman tudsz ilyeneket csinalni, csakhat ha megrendelo windows-t ker.. Kicsit furcsa hogy egy 2007-es office egy ilyen aprosagra nem kepes.
Azert köszönöm a segitseget! -
#8641
Fire/SOUL/CD
félisten
rekid
#8639
Esetleg (ha így is megfelelne), akkor sima feltételes formázással
Tudom, ez nem diagram, de ha csak az a lényeg, hogy vizuálisan legyenek megjelenítve a kapcsolók állásai adott dátumkor, akkor talán ez is megoldást jelenthet...(B,C,D oszlopokban 1 és 0 értékek szerepelnek, csak a feltételes formázásnál kikapcsoltam az értékek megjelenítését. Természetesen a cellákba 1-est és 0-át írhatsz...)
-
rekid
addikt
Hello!
Egy kis segitseget szeretnék kerni.
Office 2007
Probléma a következő:
Van egy rakás adatom ezek jellemzően státusz bitek 0-1.
Mondjuk 3 oszlopban villanykapcslo 1 kapcsolo 2 kapcsolo 3 és persze dátum.
mindezt egy diagramon szeretném megjeleníteni dátum szerint. A probléma az hogy a 3 oszlop értékei kitakarják egymást. (ugye mindegyik 1-es vagy 0-ás)
el lehet valahogy tolni egymástól a "görbéket". ? Persze anélkül hogy bármelyik oszlop értékeit kézzel tolnám el. (mondjuk egyik oszlop értékeihez 2-őt másikhoz 4-et harmadikhoz 6-ot adnék.)
Remelem érthető a probléma. -
#8638
Fire/SOUL/CD
félisten
lazlo8
#8637
Ha csak annyi a problémád, hogy mindig más és más a fájlnév, az könnyen orvosolható. Ahogy látom, a fájl neve(és csak a fájlnév) alapvetően az aktuális dátumból származtatott, de mindig ugyanabban a mappában található, azaz
"C:\utazas\12\utazas2010november11.xls"
"C:\utazas\12\utazas2010november12.xls"
"C:\utazas\12\utazas2010november13.xls"
és így továbbNo ebben az esetben egyszerűen elő lehet állítani a kívánt fájlnevet, az alábbi kód, mindig az aktuális dátumnak megfelelő fájlnevet állítja elő, azaz MA a
C:\utazas\12\utazas2010november14.xls fájlt nyitná meg.My_FileName = "C:\utazas\12\utazas" & Format(Now, "yyyymmmmdd") & ".xls"
Workbooks.Open Filename:=My_FileName -
lazlo8
tag
válasz
Delila_1
#8636
üzenetére
oké ezt ha 1-1be bemásolom akkor nem mukodiik,
mit irjak az mi legyen az utvonal, melyik fájlt nyissam meg, filenév megadása... stb. helyekre?
bocs h értetlen vagyok de kezdőként még nem nagyon értem a makrókat.
fogalmazhatnék ugyis h mik a változo paraméterek ami helyére én C:\-it irhatok vagy legalább egy *.xls-t -
lazlo8
tag
köszi a gyors segítséget sokat segítettetek , örök hálám de még mindig van vmi amit nem értek.
1.ok
2,
A makró felvevővel felvettem egy makrót.
a bajom az hogy én mindennap másnevű xls.t nyitok meg De a xls tartalma mindig ugyanaz.Workbooks.Open Filename:= _
"C:\utazas\12\utazas2010november11.xls"ha kitörlöm és egy*-ot írok az idézőjeles részbe akkor run time error 1004-es hibát kapok, *.xls-esel se működik.
mi a hiba? azt akarom hogy azt kérdezze meg tőlem hogy melyik file-t nyissa meg *.xls.a file természetesen egy excel.
3-4.ok megoldottam
más láttam neten olyat igaz ms acces de vmi vba segítségével pdf-be lett kész egy dokumentum. tehát accesbe van pl 5 tábla sok sok adattal, van mondjuk 5 lekérdezés ami leszűri az adatokat csinál 1-2grafikont és kész pdf-be az eredmény. ez létezik? vagy vmit félreértettem? -
Delila_1
veterán
Úgy vélem, hogy az átalakítandó celláid szöveg formátumú számjegyeket tartalmaznak. Egyszerűbben is átalakíthatod az egészet.
Valahova egy üres cellába beírsz egy 1-est, másolod. Kijelölöd a kérdéses tartományt, jobb klikk, Irányított beillesztés, Szorzás. Az 1-esre már nincs szükség, törölheted. Ennyi. -
kwd
csendes tag
Sziasztok,
valaki legyen szíves segítsen nekem.
Azt szeretném megadni excel makróban mintha "F2" nyomnék egy cellán vagy duplán kattintanék bele az egérrel, majd enterrel kilépnék a cella szerkesztésből.
Módosítani semmit nem szeretnék a cellán.
Az ok, az hogy ha eredetileg text formátumú oszlopot vissza formázok generálra, a formátum csak "a cellákba való bele kattogatás" után változik.Segítségeteket előre is köszönöm!
-
#8631
Fire/SOUL/CD
félisten
perfag
#8630
Pontosan tudtam miért nem futott le a kód, csak igazából az Extensibility csomag, az talán a leggyengébb láncszem az Excelben (is), legalább is régebben az volt. Bátorság (meg rendszervisszaállítási pont) kell ahhoz, hogy én azt bekapcsoljam...
(20 másodperc alatt állítom vissza a rendszer ha arról van szó, de akkor sem szórakozok azzal a csomaggal)
-
#8630
perfag
aktív tag
Fire/SOUL/CD
#8629
perfag
aktív tag
válasz
Fire/SOUL/CD
#8629
üzenetére
Kipróbáltad, vagy elméleti síkon csörtézünk?
Nem párbajra hívtalak ki, volt egy véleményed, amivel nem értek egyet.
- eszement dolognak tartom (önző hozzáállás, merthogy nekem nincs rá szükségem), dehogy próbáltam ki
- Chip Pearson neve nekem biztosítékMost viszont kipróbáltam, műxik. Ha nálad nem, akkor ezért: To make the macro work, you'll need to make sure that there is a reference to Microsoft Visual Basic for Applications Extensibility. (You do this by choosing, in the VB Editor, Tools | References and then choosing Microsoft Visual Basic for Applications Extensibility in the available references.)
-
#8629
Fire/SOUL/CD
félisten
perfag
#8628
-
#8628
perfag
aktív tag
Fire/SOUL/CD
#8620
perfag
aktív tag
válasz
Fire/SOUL/CD
#8620
üzenetére
logikusan ennek az egy makrónak azért meg kellene, hogy maradjon (mármint ami kitörli az összes többit - szerintem nem. A makró, mint interpretált program bekerül a memóriába és innentől független a forráskódtól, tehát ez utóbbi törölhető.
-
#8627
m.zmrzlina
senior tag
Fire/SOUL/CD
#8626
m.zmrzlina
senior tag
válasz
Fire/SOUL/CD
#8626
üzenetére
Én bénáztam, bocs.
Összekevertem ezt:Sheets("szűrőháló").Range("A1").Select
ezzel:
Sheets("szűrőháló").Range("A1").Value = "akármi"
-
#8626
Fire/SOUL/CD
félisten
m.zmrzlina
#8625
válasz
m.zmrzlina
#8625
üzenetére
Hát ez gond, ugyanis a
Sheets("szűrőháló").Range("A1").Selectés
Sheets("szurohalo").Range("A1").Select
sem működhetne...Ha másik munkalapon állsz, akkor nem lehet direktbe hivatkozni(kiválasztani) így egy cellát. Szerintem telepíts szervízcsomagot az Office-hoz, mert jó eséllyel most nincs, vagy legalábbis nem naprakész a frissítése...
(Nálam sem megy egyik verzió sem, Office 2010 x64)
-
#8625
m.zmrzlina
senior tag
m.zmrzlina
senior tag
Az miért van hogy ez a hivatkozás nem működik
Sheets("szűrőháló").Range("A1").Select ebben a formában
csak így:
Sheets("szűrőháló").Select
Range("A1").SelectÍgy azonban működik:
Sheets("szurohalo").Range("A1").Select
Természetesen az ékezetes formánál a munkalapnak is ékezetes a neve, a másiknál pedig nem.
-
#8624
Fire/SOUL/CD
félisten
A diagramok szerelmeseinek (hátha valaki számára jól jön)
SimplexNumerica (Ingyenes)
Pár kép
Gyári oldal -
#8623
m.zmrzlina
senior tag
Fire/SOUL/CD
#8622
m.zmrzlina
senior tag
válasz
Fire/SOUL/CD
#8622
üzenetére
Köszönöm a választ így világosabb egy kicsit.
A topicban leggyakrabban elég egyszerű problémák merülnek fel, legalábbis arra gondolok, hogy nem igazán számít a sebesség.
Bár egy Application.ScreenUpdating = False/True páros még egszerűbb esetekben is látványos eredményt tud produkálni.
összeszednek mindenféle leírást és azt alkalmazzák, azaz ilyen dirib-darabokból "tákolják össze"
A tákolással (hobbiszinten) szerintem nincs baj inkább azzal, hogy ha valaki megelégszik a tákolmánnyal és nem akar fejlődni és jobbat csinálni.
-
#8622
Fire/SOUL/CD
félisten
m.zmrzlina
#8621
válasz
m.zmrzlina
#8621
üzenetére
Nincs ebben ellentmondás, csak vannak olyan esetek (általában egyszerű dolgok esetében), ahol a beépített funkciók lassabbak, mint egy VBA kód.
Az első példa erről szól, azaz a MAX függvény meghívása sokkal lassabb, mint egy IF/THEN/ELSE elágazás/struktúra alkalmazása.A második eset már teljesen más, hisz ott egy nagyobb tartomány összegét számolják ki, ciklus segítségével, ez esetben a beépített WorkSheetFunction.Sum függvény meghívása lényegesen hatékonyabb.
A topicban leggyakrabban elég egyszerű problémák merülnek fel, legalábbis arra gondolok, hogy nem igazán számít a sebesség. Egy összetettebb project esetében persze ezekre illik odafigyelni. A másik "probléma" meg az szokott lenni, hogy gyakran (főleg azon emberkéknél, akik nem rég óta ismerkednek az Excel-el illetve a VBA programozással) abba a hibába esnek, hogy a netről összeszednek mindenféle leírást és azt alkalmazzák, azaz ilyen dirib-darabokból "tákolják össze" a programjukat. Na ez öreg hiba, mert gyakran az egyik szubrutinjuk teljesen más programozástechnikát tartalmaz(akárcsak szintaktikailag is), mint a másik.
Az is gond kezdő emberkéknél, hogy nem arra használják az excel-t, amire az alapvetően hivatott, azaz néha úgymond adatbázis-kezelőként használják, olyan feladatokat szeretnének kivitelezni az excel-el, amire Ő nem igazán hivatott, és ilyenkor jön a teljesen felesleges makrózgatás, és a szükségtelenül bonyolult makrókódok.
-
#8621
m.zmrzlina
senior tag
m.zmrzlina
senior tag
Fura dolgot találtam miközben VBA kódok optimalizálása (működés gyorsítása) témakörben olvasgattam.
Itt: http://www.avdf.com/apr98/art_ot003.html a Tip #3-nál azt írják (ha jól értem) hogy ha lehet ne használjuk az Excel függvényeit a kódban inkább programozzuk le az összefüggést.
Itt meg: http://www.cpearson.com/excel/optimize.htm a Worksheet Functions résznél mintha pont az ellentéte lenne leírva.
Most akkor valamit félreértek vagy tényleg valami ellentmondás van?
-
#8620
Fire/SOUL/CD
félisten
Oly
#8618
Deleting All VBA Code In A Project résznél találod
Most nem próbálom ki, de majd írj mire jutottál véle, logikusan ennek az egy makrónak azért meg kellene, hogy maradjon(mármint ami kitörli az összes többit)... -
#8617
Delila_1
veterán
Vizes Tomi
#8616
Delila_1
veterán
válasz
Vizes Tomi
#8616
üzenetére
Nincs mit.
-
#8616
Vizes Tomi
tag
Vizes Tomi
tag
Köszönöm
Ez nem jutott eszembe -
#8615
Delila_1
veterán
Vizes Tomi
#8613
Delila_1
veterán
válasz
Vizes Tomi
#8613
üzenetére
Vegyél fel egy új oszlopot, ahova a HÓNAP függvény segítségével beíratod az A oszlop hónapjának a számát, és erre az oszlopra hivatkozz a SZUMHATÖBB-bel.
Szóba jöhet még a SZOZRATÖSSZEG függvény is a megoldáshoz.
-
Gimre
csendes tag
Sziasztok!
Egy kis segitség kellene. Office 2010-t használok és az excelben letöltöttem egy sablont, namost van benne egy függvény méghozzá a darabteli és a kritérium mezőben ez volt [@Country] 1ébbként a Country egy lenyiló lista jellegű vmi, szerintem szürő. szoval azt szeretném kérdezni hogy miért kell a @-jel. Ugyan ez a jel van ([@W*3])+[@D].
Azt nem tom ha esetleg kitörlöm a @ jelet akkor mitörténik.
Előre is köszönömGimre
-
#8613
Vizes Tomi
tag
Vizes Tomi
tag
üdv !
Az lenne a kérdésem, hogy hogyan tudok időtartamok között keresni, és összesíteni
Pl Tankolási listadátumok kártyaszámok mennyiség Ft
2010.01.08 34566777644 DIESEL n 63,42 18703
2010.01.29 34566777644 DIESEL n 64,72 18892
2010.02.11 34566777644 DIESEL n 64,48 19595
2010.02.16 34566777644 DIESEL n 56,53 16501
2010.02.23 34566777644 DIESEL n 68,66 20866
2010.03.03 34566777644 DIESEL n 66,47 20599
2010.03.12 345667776447 DIESEL n 64,2 20088valami olyasmit szeretnék , hogy ilyen listából szedje ki, hogy mennyi volt az összes tankolás pl januárban egy adott kártyára.
próbálkoztam kimutatásvarázslóval de a januári tankolásokat nem akarta összevonni
próbáltam még a szumhatöbb függvényt de nem tudtam úgy beállítani , hogy pl a 2010.01.01 és a 2010.01.31 közötti adott rendszámnak megfelelő tankolt mennyiségeket összeadja.
Segítenétek?
Köszönömüdv
-
Gimre
csendes tag
Sziasztok!
Egy kis segitség kellene. Office 2010-t használok és az excelben letöltöttem egy sablont, namost van benne egy függvény méghozzá a darabteli és a kritérium mezőben ez volt [@Country] 1ébbként a Country egy lenyiló lista jellegű vmi, szerintem szürő. szoval azt szeretném kérdezni hogy miért kell a @-jel. Ugyan ez a jel van ([@W*3])+[@D].
Azt nem tom ha esetleg kitörlöm a @ jelet akkor mitörténik.
Előre is köszönöm
Imre -
Delila_1
veterán
A 2-es kérdésre:
Sub Utvonal()
Dim Utvonal As String, Fajlnev As String
Utvonal = InputBox("Mi legyen az útvonal?", "Útvonal kiválasztása", Default)
Fajlnev = InputBox("Melyik fájlt nyissam meg?", "Fájlnév megadása", Default)
Workbooks.Open Filename:=Utvonal & "\" & Fajlnev & ".xls"
End SubFire
Tényleg kimaradt a képernyőfrissítés letiltása
, jó, hogy észrevetted. -
#8607
Sickboy25
addikt
m.zmrzlina
#8601
Sickboy25
addikt
válasz
m.zmrzlina
#8601
üzenetére
Köszi ez így jó lesz...
-
#8606
Fire/SOUL/CD
félisten
Delila_1
#8603
-
#8605
m.zmrzlina
senior tag
lazlo8
#8602
m.zmrzlina
senior tag
létrehoztam a view>toolbars>command toolbox segítségével egy command buttont amit tök szépen megformáztam.
ha ráklikkelek jobb gombbal nem tudom 1 makrohoz se hozzárendelni, míg ha beillesztek
egy wordart,clipart stb képet akkor jobb gombbal hozzá tudom adni a makrót,(assign macro).
mit tegyek hogy a command button-on működjön?Ha arról beszélünk ami nálam az Űrlap vezérlőelemek helyen elérhető akkor szerintem ne a gombon, hanem a keretén (nem kretén:-) kattints jobbal (ne ferdén csíkozott hanem pontozott legyen a keret)
Ha majd müködni fog a command buttonom szeretném hogy az legyen az első dolga hogy
megkérdezi a felhasználót hogy honnan nyissa meg a forrás(adat) file-t (ctrl+o) ezt hogy csináljam?Nem tudom milyen fájlt kell megnyitni és mit kell vele csinálni de ha jó az neked, hogy egy textfájl minden sorát egyetlen cellába másolja (egy sor egy cella) akkor próbálkozz ezzel:
Public FileName As Variant
Sub GetImportFileName()
Dim Filt As String
Dim FilterIndex As Integer
Dim Title As String
Filt = "Text Files (*.txt),*.txt," & "All Files (*.*),*.*"
FilterIndex = 1
Title = "Válaszd ki a fájlt"
FileName = Application.GetOpenFilename (FileFilter:=Filt, FilterIndex:=FilterIndex, Title:=Title)
If FileName = False Then
MsgBox "Nem volt fájl kiválasztva."
Exit Sub
End If
Open FileName For Input As #1
r = 0
Do Until EOF(1)
Line Input #1, Data
ActiveCell.Offset(r, 0) = Data
r = r + 1
Loop
Close #1
End Submi az a parancs amivel kitudom jelölni azt a tartományt ami tartalmaz adatot?
pl. itt van nálam egy excel amibe van 50 sor adat a p oszlopig, jövő héten ez a táblázat 400ig
fog adatot tartalmzi az ai oszlopig.nekem most csak 50 sor kell legközelebb pedig 400,
ha mindet kijelölöm az azért nem jó mert van egy másik táblám ami szintén 50sort tartalmaz
most holnap meg150-et. tehát 2 excelből kellene 1 csak a tartomány mindig változik.Erre több megoldás is van, pontosítsd a feladatot. Egybefüggő-e a tartomány stb... stb...
-
#8604
Fire/SOUL/CD
félisten
lazlo8
#8602
1. Ezt nem tudom, nem használom már a 2003-at, majd valaki ránéz
2. Ezt meg nem biztos, hogy jól értem. Miért akarsz egy olyan gombot az eszköztárra, ami már létezik?
3. UsedRange.Select
4. Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:="FSCD_" & Format(Now, "yyyymmdd") & ".xlsm"
Application.DisplayAlerts = True -
Delila_1
veterán
válasz
medium84
#8596
üzenetére
Ezt a makrót abba a füzetbe másold be, ahol a 2 oszlopod van. Feltételeztem, hogy mindkét füzeted első lapján vannak az adataid. A makróban írd át a füzetek nevét (Elso, Masodik).
Sub Megjelol()
Dim sor As Integer, usor As Integer
Dim serial, c
sor = 2: usor = ActiveSheet.UsedRange.Rows.Count
For sor = 2 To usor
serial = Cells(sor, 1).Value
Windows("Masodik.xls").Activate
With Range("A:A")
Set c = .Find(serial, LookIn:=xlValues, LookAt:=xlPart)
If Not c Is Nothing Then
Cells(c.Row, 1).Font.ColorIndex = 3
Windows("Elso.xls").Activate
Range(Cells(sor, 1), Cells(sor, 3)).Font.ColorIndex = 3
Cells(sor, 2).FormulaR1C1 = "=VLOOKUP(RC[-1],[Masodik.xls]Munka1!C1:C2,2,0)"
Cells(sor, 3).FormulaR1C1 = "=VLOOKUP(RC[-2],[Masodik.xls]Munka1!C1:C3,3,0)"
End If
End With
Windows("Elso.xls").Activate
Next
Range("B:C").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
Cells(1).Select
Application.ScreenUpdating = True
End Sub -
lazlo8
tag
négy kérdésem lenne.
1.
létrehoztam a view>toolbars>command toolbox segítségével egy command buttont amit tök szépen megformáztam.
ha ráklikkelek jobb gombbal nem tudom 1 makrohoz se hozzárendelni, míg ha beillesztek
egy wordart,clipart stb képet akkor jobb gombbal hozzá tudom adni a makrót,(assign macro).
mit tegyek hogy a command button-on működjön?
2.
Ha majd müködni fog a command buttonom szeretném hogy az legyen az első dolga hogy
megkérdezi a felhasználót hogy honnan nyissa meg a forrás(adat) file-t (ctrl+o) ezt hogy csináljam?3.
mi az a parancs amivel kitudom jelölni azt a tartományt ami tartalmaz adatot?
pl. itt van nálam egy excel amibe van 50 sor adat a p oszlopig, jövő héten ez a táblázat 400ig
fog adatot tartalmzi az ai oszlopig.nekem most csak 50 sor kell legközelebb pedig 400,
ha mindet kijelölöm az azért nem jó mert van egy másik táblám ami szintén 50sort tartalmaz
most holnap meg150-et. tehát 2 excelből kellene 1 csak a tartomány mindig változik.
4.
makró segítségével el lehet menteni egy excel dokumentumot hogy a mai dátum+ vmi legyen a
file neve? sőt zip segítségével be lehet tömöríteni vagy ez már túlzás?
Amúgy lentebb a lehetőség, a feltételeket remélem jól adtam meg. 
). És szerintem mindkettő 6.0-t tolja, de majd ezt mások, az okosabbak megfejtik. 
. A VBA-ban pont az a lazaság tetszett meg nekem, hogy nem kell szigorúan visszavezetni az alprogramok meghívását visszafelé a legelsőig, mint régen a FORTRAN-ban vagy a C++ ban csináltam, bárhol ki lehetett lépni. Most úgy látszik, megint rendet kell tanulnom ![;]](http://cdn.rios.hu/dl/s/v1.gif)
.
(sry, de nekem ez az ág teljes homály), hogy az oszlopszélesség a legszélesebb szöveghez igazodjon és legyenek az oszlopok balra igazítva?
. Szóval az lenne a kérdés, hogy miért találja Nem megfelelő funkció! -nak az Excel2007 az alprogram belsejében kiadott END operátort, ha az OK után minden rendben van? Előre is köszi!
Új hozzászólás Aktív témák
Hirdetés
Fferi50- Házimozi haladó szinten
- Nintendo Switch 2
- Honda topik
- Apple MacBook
- PlayStation 4
- Star Trek
- Az NVIDIA ipari AI-felhőt épít a németeknek, együtt az OpenAI és a Google
- Geri Bátyó: B550 szűk keresztmetszet, de mi és miért?
- Stellar Blade
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- További aktív témák...
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Kaspersky, McAfee, Norton, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - NYÁRI AKCIÓ!
- Gyermek PC játékok
- BESZÁMÍTÁS! ASUS ROG STRIX Z270G GAMING WiFi alaplap garanciával hibátlan működéssel
- HP Laptop 15-fc0026nh (AY7E1EA)
- ÁRCSÖKKENTÉS Lenovo ThinkPad P51s, P52s, T570, T580 eredeti Lenovo, belső akkumulátor eladó
- ÁRGARANCIA! Épített KomPhone Intel i7 14700KF 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- Bomba ár! Lenovo ThinkPad X390: i5-G8 I 16GB I 256GB SSD I 13,3" FHD Touch I Cam I W11 I Gari!
Állásajánlatok
Cég: PC Trade Systems Kft.
Város: Szeged
Cég: CAMERA-PRO Hungary Kft
Város: Budapest