Keresés

Részletes keresés

Fferi50 Creative Commons License 2013.12.04 0 0 23272

Bocs!

 

Ez biztosan nem jó, mert ugyanazt csinálja!

 

Üdv.

Előzmény: Fferi50 (23270)
Törölt nick Creative Commons License 2013.12.04 0 0 23271

"olyan egyszerűnek tűnik"

 

Hát, nem egyszerű.

Szoktam mondani, hogy Excellel bármit meg lehet csinálni, de most kedvem támadt visszavonni.

Előzmény: JT2 (23261)
Fferi50 Creative Commons License 2013.12.04 0 0 23270

Szia!

 

Próbáld így:

 

Range("A1").TextToColumns Destination:=Range("A1"), _
DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=True, _
Tab:=False, _
Semicolon:=False, _
Comma:=False, _
Space:=True, _
Other:=False

Üdv.

Előzmény: maciti (23267)
Sánta Kutya (SK) Creative Commons License 2013.12.04 0 0 23269

Ha jól sejtem, ez egy makrórögzítővel felvett makró. Így soha nem fog menni, mert a szövegből oszlopok funkció csak egy határoló karaktert kezel.

De ha ugyanezt elkezded elölről több lépésben, pl. a makrórögzítés közben először csinálsz egy globális cserét (két szóközből valami nem használt karakter, pl. | vagy @, mindent cserél), majd az így bevezetett határolójel szerint bontasz, akkor sikerülni fog.

Lehet még turbózni a felesleges szóközökk törlésével is.

Előzmény: maciti (23267)
Fferi50 Creative Commons License 2013.12.04 0 0 23268

Szia!

 

Köszi, mondanám, hogy ezért írtam oda zárójelben, de sajnos nem így van. (Aztán meg hiába is vettem volna észre, szerkeszteni meg nem lehet a hozzászólást...ja, hogy ezért van az előnézet.)

tehát a kiváltó képlet helyesen

=LIN.ILL(C2:C6;A2:A6^{123})

 

Üdv.

 

Mindig tanul az ember!!!(is)

Előzmény: Sánta Kutya (SK) (23263)
maciti Creative Commons License 2013.12.04 0 0 23267

Sziasztok!

 

Tudna valaki segíteni abban, hogy egy stringből készített oszlop határoló karaktereit hogyan tudnám megváltoztatni. Az a problémám, hogy kettő, vagy több szóköz esetén kellene új oszlop.

 

például:

 

M 8   HIT-V M8*80/65                   8      8.8    HILTI      0.00kg

 

Ezt a lenti kódot próbáltam, de nem sikerül. Mindenképpen egy szóköz, vagy egymásutáni szimplán szereplő szóközök esetén teszi új oszlopba.

 

 

Sub Oszlopbabont8()
'
'

'
Range("A1").TextToColumns Destination:=Range("A1"), _
DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=True, _
Tab:=False, _
Semicolon:=False, _
Comma:=False, _
Space:=False, _
Other:=True, _
OtherChar:=" "

End Sub

 

Ez lett belőle:

 

 

Pedig ezt szertném:

 

 

 

Van valakinek ötlete?

 

 

 

Sánta Kutya (SK) Creative Commons License 2013.12.04 0 0 23266

:-)

Előzmény: Törölt nick (23265)
Törölt nick Creative Commons License 2013.12.04 0 0 23265

Úgy látom, igen.

Előzmény: Törölt nick (23264)
Törölt nick Creative Commons License 2013.12.04 0 0 23264

Ehhez négyszer kellett beírnod?

(próba: \\)

Előzmény: Sánta Kutya (SK) (23263)
Sánta Kutya (SK) Creative Commons License 2013.12.04 0 0 23263

És a backslash jele továbbra is \\ a fórumban. :-)

Előzmény: Fferi50 (23262)
Fferi50 Creative Commons License 2013.12.04 0 0 23262

Mindenkinek, akit érdekel a tömbök használata!

 

Tbando-val addig agyaltunk NPW problémáján(ak egy részén), míg az alábbi érdekességre jöttünk rá:

 

Ezt a képletet:

=LIN.ILL(TRANSZPONÁLÁS(D9:R9);TRANSZPONÁLÁS(D$2:R$2)^{1;2;3})

ki lehet váltani ezzel:

=LIN.ILL(D9:R9;D$2:R$2^{1;2;3})

mivel a transzponálás mindkét bemenő tömböt érinti, ezért felesleges.

 

Viszont ha a képletünk oszlopvektorokat tartalmaz:

=LIN.ILL(TRANSZPONÁLÁS(C2:C6);TRANSZPONÁLÁS(A2:A6)^{1;2;3})

akkor a kiváltó képlet így néz ki:

=LIN.ILL(C2:C6;A2:A6^{123})

 

Az Excelben az oszlopvektorok elemeit a   ;   (pontosvessző) választja el, mig

                   a  sorvektorok elemeit a           (backslash) választja el.

 

Tehát transzponálás helyett egyszerűen kicseréljük az elválasztó jeleket, ha direktben adunk meg tömböket valamelyik képletben.

 

Üdv. mindenkinek!

JT2 Creative Commons License 2013.12.03 0 0 23261

Üdv mindenkinek!

 

Kellene egy kis segítség!

 

Már vagy egy hónapja próbálkozom készíteni rögzítéssel vagy szerezni egy olyan makrót, mely MSO 2003 Excelben a kijelölt cellákban a képet tartalmazó megjegyzés esetén beállítja a kép eredeti méretét. Ennyi! Ha ez egyáltalán lehetséges? Korábban találtam egy angol nyelvű topicot, ahol angolul már kérte ugyanezt valaki de ott nem tudták megoldani. írt mindenki mindenfélét de erre nem volt megoldás pedig olyan egyszerűnek tűnik.

tbando Creative Commons License 2013.12.03 0 0 23260

Belátom, igazad van.

 

Most már csak azt nem értem, hogy NPW-nek hogy-hogy nem tűnt fel, hogy a dátumtranszformációja utáni x^123-mal kapott Linill-je nem a harmadfokú polinomé. 

Előzmény: Fferi50 (23252)
wawabagus Creative Commons License 2013.12.03 0 0 23259

Fferi50, Jimmy the Hand!!!!

Zsenik vagytok!!!!!!!

Nagyon köszönöm a segítséget!!!!!

<3

J.

Fferi50 Creative Commons License 2013.12.03 0 0 23258

Szia!

 

Ebben viszont igazad van, ezt benéztem.

 

De még jobb így:

 

if  MsgBox(prompt:="Kér új számolást?", Buttons:=vbYesNo)=vbNo then

    exit sub

end if

loop

 

Változó sem kell, hiszen máshol úgysem használom.

 

A többi marad ugyanaz.

 

Üdv.

Előzmény: Törölt nick (23256)
Fferi50 Creative Commons License 2013.12.03 0 0 23257

Szia!

 

Szerintem belül is megy a dolog.

 

Üdv.

Előzmény: Törölt nick (23254)
Törölt nick Creative Commons License 2013.12.03 0 0 23256

Ja és még valami.

 

A Choose változó tartalmazza a választ, de a Response változót vizsgálod?

 

Előzmény: wawabagus (23253)
Fferi50 Creative Commons License 2013.12.03 0 0 23255

Szia!

 

A macro elejére, ahol az érdemi végrehajtás kezdődik beírod:

 

do while true

 

A feltétel vizsgálatnál pedig:

Choose = MsgBox(prompt:="Kér új számolást?", Buttons:=vbYesNo)
If Response = vbNo Then
    Exit Sub

End if

loop

end sub

 

Üdv.

Előzmény: wawabagus (23253)
Törölt nick Creative Commons License 2013.12.03 0 0 23254

Ezt a kérdést nem a makróban kellene feltenni, hanem azon kívül.

 

Sub Izé()

Dim Wálasz As Long

    Do

        Masodfoku1

        Wálasz = MsgBox("Még egy kört?", vbYesNo)

    Loop Until Wálasz = vbNo

End Sub

Előzmény: wawabagus (23253)
wawabagus Creative Commons License 2013.12.03 0 0 23253

Sziasztok!

Segítséget szeretnék tőletek kérni.

 

Van egy macro...fut fut...majd a végén felteszek egy kérdést. Ha a válasz nem, akkor kilépek a macroból, ha igen, akkor újra kéne magát indítani...

 

Ezzel vagyok gondban. Hogyan tudom újra indítani a macrot a macro végén egy feltételhez kapcsolva?

 

Eddig ezt csináltam....működik a kilépés, de nem tudom elindítani újra önmagát...

 

Tudtok segíteni esetleg?

Előre is köszi!

 

Sub Masodfoku1()

.

.

.

.

Choose = MsgBox(prompt:="Kér új számolást?", Buttons:=vbYesNo)
If Response = vbYes Then
DoCmd.RunMacro "Masodfoku1"
Else
' The no button was selected.
Exit Sub
End If

Fferi50 Creative Commons License 2013.12.03 0 0 23252

Szia ismét!

 

Másrészt, ha csinálsz egy próbát a lin.ill függvénnyel, akkor azt látod, hogy az x a 123-on -ra azt írja ki, hogy #szám, majd az egészre azt, hogy #érték, mert a #szám bemeneti érték nem megfelelő az x értékekre.

 

Tehát még akkor is jön az #érték hibaüzenet, ha tömbképletként van bevive egyébként.

 

Üdv.

 

 

 

 

 

Előzmény: tbando (23248)
tbando Creative Commons License 2013.12.03 0 0 23251

Aha. Erre nem is gondoltam, hogy egy tömbképletet a 2010-n nem tömbképletként akar bevinni. 

Előzmény: Fferi50 (23249)
tbando Creative Commons License 2013.12.03 0 0 23250

A szűrt listából szerintem sehogy se akard eltüntetni a már nem x-ket, mert aki kimaradt belőle, az már nem tud visszakerülni. 

 

Amit te akarsz szerintem, azt egy új szúréssel tudod elérni. Ehhez átírhatod a kritériumtartomány első celláját, ahogy Fferi javasolta, vagy megcsinálod az én indexes oszlopaimat, de az irányított szűrés helyett alkalmazhatod a normál szűrést is az új nap oszlopát választva.

Előzmény: Hellcat86 (23247)
Fferi50 Creative Commons License 2013.12.03 0 0 23249

Szia!

 

Ez a hibaüzenet akkor is, ha nem tömbképletként viszi be...

 

Üdv.

Előzmény: tbando (23248)
tbando Creative Commons License 2013.12.03 0 0 23248

OK. De a hibaüzenete nem érvénytelen számra, hanem érvénytelen argumentumra utal.

Előzmény: Fferi50 (23246)
Hellcat86 Creative Commons License 2013.12.03 0 0 23247

Köszi a segítséget, sikerült kiszűrni őket, meg is van mindenki akinél x van. Már csak az az egyetlen kérdésem lenne, hogy ha változik a beosztás akkor hogyan tudom automatizálni, hogy akinél már nem x van azt eltüntesse a szűrt listából, vagy akinél megjelenik az x azt belevegye; frissítse a listát?

Előzmény: tbando (23243)
Fferi50 Creative Commons License 2013.12.03 0 0 23246

Szia!

 

Nézd meg lsz. amit NPW-nek írtam. Kipróbáltam, a mai dátum a 123-on már nem megy be az Excel agyába!

 

Üdv.

Előzmény: tbando (23242)
tbando Creative Commons License 2013.12.03 0 0 23245

Ha túl nagy a szám, akkor #SZÁM hibát ír ki.  Az #ÉRTÉK a nem megfelelő típúsú argumentumot jelöli. 

Előzmény: NPW (23212)
Fferi50 Creative Commons License 2013.12.03 0 0 23244

Szia!

 

Már ne is haragudj, csak nagyon halkan és csendesen mondom, hogy ez a képlet:

=LIN.ILL(TRANSZPONÁLÁS(D9:R9);TRANSZPONÁLÁS(D$2:R$2)^{123})

nem egyenlő ezzel:

=LIN.ILL(TRANSZPONÁLÁS(D9:R9);TRANSZPONÁLÁS(D$2:R$2)^{1;2;3})

 

Az elsővel a 123-dik hatványra kívánod emelni a dátumokat!!! Ezt nem bírja már el az excel.

 

Szerintem próbálkozz mégis a beállításokat megnézni!

 

Üdv.

Előzmény: NPW (23227)
tbando Creative Commons License 2013.12.03 0 0 23243

A Munka1 táblázatodnak nincs fejléce. úgy elég nehéz szűrni.

 

Meg azt sem írtad meg, hogy melyik napra akarod elvégezni a szűrést.

 

Ha a naponkénti munkavégzőket akarod listázni, akkor azt javaslom, hogy miután megcsináltad a fejlécet, a táblázat mellé tegyél még 2 oszlopot. Az első a névoszlop, a második pedig a vizsgálandó napé lesz. És ezekbeaz index függvénnyel hozd ki a neveket meg az adott napot. Majd erre a 2 oszlopra szűrjél 

Előzmény: Hellcat86 (23241)

Ha kedveled azért, ha nem azért nyomj egy lájkot a Fórumért!