Just nu i M3-nätverket
Gå till innehåll

MH_resurrected

Medlem
  • Antal inlägg

    673
  • Gick med

  • Senaste besök

  • Vunnit antal dagar

    11

MH_resurrected vann dagen: 4 december

MH_resurrected hade det mest gillade innehållet!

Om MH_resurrected

  • Medlemstitel
    Flitig

Senaste profilbesöken

Blocket med senaste besökare är inaktiverat och visas inte för andra besökare.

  1. MH_resurrected

    Skrivarteknik á 2019?

    Jag blev så x@£$ trött på intorkade bläckstråleskrivare för flera år sen. Köpte en billig svartvit laser istället och den funkar alltid - ingenting tokar och första toner-kassetten sitter fortfarande i (tror att det blir billigare att köpa en ny rea-skrivare än att byta toner när det är dags att byta). Kan du inte köpa en laser (eventuellt färg) och skicka efter fotoutskrifter vid behov? Eller någon liten smartphoneskrivare med svindyrt papper, typ: https://m3.idg.se/2.1022/1.700689/sprocket-plus-miniskrivare-till-mobilen https://pcforalla.idg.se/2.1054/1.708623/canon-zoemini-miniskrivare
  2. Om du accepterar att filtrera fram en lista men inte vill ha pivottabellen så finns det formellösningar. här är ett exempel om du skriver in Box-nr i cell G1 och vill påbörja din filtrerade lista i cell i1 =OMFEL(FÖRSKJUTNING($A$1;MÄNGD(15;6;RAD($A$1:$A$400)/($A$1:$A$400=$G$1);RAD())-1;KOLUMN()-9);"") Kopiera några kolumner åt höger och ett lämpligt antal rader ner. Monshi har gjort en snyggare INDEX-formel i någon tråd men jag hittar den inte.
  3. Borde inte en pivottabell vara lika enkel? DVs, i praktiken att du filtrerar fram en lista. 1. stå i din rådatatabell 2. INFOGA->pivottabell 3 "välj var du vill.....placeras" "på detta kalkylblad": t.ex cell J1 [OK] Rapportfilter =Box Radetiketter=År, Publ, Granskad (whatever) markera din pivottabell och gå till menyn ""Verktyg för pivottabel": Design Delsummor= visa inte delsummor Totalsummor= av för rad och kolumn Rapportlayout = visa i tabellformat Rapportlayout = välj om du vill upprepa etiketter (annars grupperas t.ex år) Om användaren ändrar värdet i rapportfiltret "Box" så får man fram det du vill ha. Om du inte tror att användarna klarar av rapportfiltret "Box" så kan du ställa dig i pivottabellen och gå till ""Verktyg för pivottabel": alternativ->infoga utsnitt BOX Så får du någonting som t.om borde klarar ett chefstest Inte så snyggt som du vill men väldigt mycket enklare än att skapa din variant.
  4. MH_resurrected

    Excel diagram

    Hej. Tomma celler I de tomma cellerna kan du skriva in formeln : =SAKNAS() så att du får felmeddelandet #saknas!. Då fattar excel att du vill interpolera Alternativt Högerklicka på diagram och välj "Markera Data" Klicka på knappen [Dolda och tomma celler] och välj att datapunkterna skall kopplas. Mjuk linje Så vitt jag vet går det inte att göra med vanliga linjediagrammet. Men du kan göra om ditt diagram till ett punktdiagram med linjer. Då måste du först göra om rådatatabellen så att översta rubrikraden (mv, v1...) blir rena tal 0 1 2 3 4 5 alfa 72 71 #SAKNAS! 70 77 71 beta 72 75 69 73 #SAKNAS! 72 gamma 72 74 #SAKNAS! 72 71 77 Markera dina rådata och gå till infoga diagram->Punkt->Punkt med utjämnade linjer
  5. MH_resurrected

    LÖST Hackad konto?

    Nej. Självklart stämmer det inte.... Jag har skyddstejpen kvar på mina kameror
  6. MH_resurrected

    LÖST Hackad konto?

    Jag fick ett nästan identisk. Men mittensektionen var anpassad till mig 😋 "... Jag vill säga - du är en stor pervert. Du har en otrolig fantasi! Därefter kom en idé till mig. Jag gjorde en skärmdump av den intima webbplatsen där du har kul (du vet vad det handlar om, eller hur?). Jag tog en bild av dig under din underhållning (använder kameran på din enhet). Det visade sig fantastiskt, utan tvivel! " Puhhh. Tur att de använde en gammal adress. Annars hade jag gått på det...
  7. MH_resurrected

    Dela kolumn

    1). Ja. DATA->dataverktyg->text till kolumner Avgränsade fällt [nästa] Semikolon [slutför] OBS!!!!! du infogar inga nya kolumner för de delade värdena. Om det står något till höger så skrivs det över. Infoga kolumn vid behov 2.) Nja Så vitt jag vet kan man inte slå ihop på något enkelt sätt. Du får nog göra en formel och kopiera ner. typ =SAMMANFOGA(A1;";";B1) eventuellt med någon koll om det finns två värde, typ: =SAMMANFOGA(A1;OM(ANTALV(A1:B1)=2;";";"");B1) 2b) Eller spara din tabell som semikolon-separerad textfil (komma separerad brukar bli semikolonseparerad i svensk excel). Sen kan du kopiera från någon textanterare (typ anteckningar). Om det är bamsefiler kanske det är enklast
  8. MH_resurrected

    HTTPS

    Hej. Om man skriver in eforum.se så skickas man vidare till https://eforum.idg.se Men på sidan: https://pcforalla.idg.se/2.1054/1.704638/basta-genvagarna-for-google-kalendern Försöker Appel länka till Eforum med en https-adress. a href="https://www.eforum.se/.... Och då verkar det inte finnas någon omdirigering till eforum.idg.se Jag vette tusan var omdirigeringen skall ligga. Men det vet säkert Felix :-)
  9. MH_resurrected

    Kopiera färgläggning från bladx till blad1

    OFFSET med (i-2) raders förskjutning Worksheets("Blad" & I).Range("A2:A31").Interior.Color = _ Worksheets("Blad1").Range("B2:B31").Offset(rowOffset:=0, columnOffset:=(I - 2)).Interior.Color Men(1) den här raden hämtar färg FRÅN blad1 TILL blad x, dvs tvärs emot vad du säger i rubriken (det som står till vänster om "= " tilldelas ju värdet/egenskapen) Om rubriken stämmer vill du ha: Worksheets("Blad1").Range("B2:B31").Offset(rowOffset:=0, columnOffset:=(I - 2)).Interior.Color= _ Worksheets("Blad" & I).Range("A2:A31").Interior.Color Men(2) VBA kommer bara att hämta color-koden från den första cellen till höger om likhetstecknet. Om du har blandade färger så verkar den göra något slag summering/0-ställning så att färgen blir svart . Om du har flera olika färger på ett blad/kolumn kan du köra en "inre" loop som går igenom varje cell istället för att försöka kopiera områdets formatering: DIM x As integer For I = 2 To WS_Count For x = 2 To 31 Worksheets("Blad" & I).Range("A2:A31").Cells(x).Interior.Color = _ Worksheets("Blad1").Range("B2:B31").Offset(rowOffset:=0, columnOffset:=(I - 2)).Cells(x).Interior.Color Next x Next I För att kopiera områdets formatering kan du köra klassisk klistra in special-format: For I = 2 To WS_Count Worksheets("Blad1").Range("B2:B31").Offset(rowOffset:=0, columnOffset:=(I - 2)).Copy Worksheets("Blad" & I).Range("A2:A31").PasteSpecial Paste:=xlPasteFormats Next I hämtar från blad i och kopierar till blad x. Vänd på koden vid behov. För en gångs skull rekommenderar jag att du kör en select någonstans i koden. Annars kan "Paste" hamna lite varsomhelst om du har en markering när du påbörjar makrot.
  10. MH_resurrected

    Kopiera värden från andra blad

    Jag förstår inte riktigt vad du vill göra. Men några principer. Om du, I blad2 har skrivit in =blad1!I7  I en cell så kan du "kopiera ner" den formeln genom att dra i nedre högra hörnet av cellen så att det blir: =Blad1!I7 =Blad1!I8 =Blad1!I9 Osv (du kan även markera cellerna och trycka Ctrl+D för att fylla på med formler) https://support.office.com/sv-se/article/kopiera-en-formel-genom-att-dra-fyllningshandtaget-i-excel-för-mac-dd928259-622b-473f-9a33-83aa1a63e218 Om du vill summera 1i7 till och med i12 kan du använda Summafunktionen: =SUMMA(Blad1!I7:I12) Obs att du använder : (kolon) för att välja ett sammansatt område. Om du istället vill ha enskilda områden, t.ex rad 7,9, 11, så skiljer du dem åt med ett ; (semikolon), typ =SUMMA(Blad1!I7;Blad1!I9;Blad1!I11) Microsofthjälp: https://support.office.com/sv-se/article/Funktionen-SUMMA-043e1c7d-7726-4e80-8f32-07b23e057f89 OBS: det är en maskinöversatt sida. I Svensk excel använder man semikolon (;) inte komma (,) för att skilja argument åt helsvenskt: https://www.excelbrevet.se/autosumma/ Svengelskt http://www.excelkungen.com/exceltrix/excel-for-nyborjare/enkla-summeringar-i-excel.htm Du kan även summera över flera blad (3D formel), det här slår t.ex ihop värdet i I7 i både blad1, 2 och 3. =SUMMA(Blad1:Blad3!I7) eller i7 till i11 i blad1,2 och 3 =SUMMA(Blad1:Blad3!I7:I11) Ähhh. Testa dig fram och återkom med tydligare frågor. Jag har nog missförstått vad du vill.
  11. MH_resurrected

    Sortera ut text ur cell

    Hej. Jag missade att du hade lagt ut en fil. Eftersom du har radbrytningar i adressen (teckenkod10) så kan du göra en grovrensning. Det här ger texten på sista raden =RENSA(HÖGER(BYT.UT(RENSA(D2);TECKENKOD(10);REP(" ";99));99)) Och, om jag läser rätt så saknar alla Postnummer mellanslag . Så det här borde funka (tittar bara i sista "raden", hittar första mellanslaget och ta allt till höger om det) =EXTEXT(RENSA(HÖGER(BYT.UT(RENSA(D2);TECKENKOD(10);REP(" ";99));99));1+SÖK(" ";RENSA(HÖGER(BYT.UT(RENSA(D2);TECKENKOD(10);REP(" ";99));99)));50) Det blir 3-4 fel där det fattas mellanslag mellan postnummer och Orttsnamn. Men det är nog så bra du kan få till det. ******************************************** En alternativ variant, om du har väldigt tråkigt. Går från slutet och Försöker se hur länge text är exakt lika med VERSAL text. (matrisformel): =HÖGER(D2;MAX(RAD($1:$99)*EXAKT(HÖGER(D2;RAD($1:$99));VERSALER(HÖGER(D2;RAD($1:$99))))*ÄRTAL(HITTA(VÄNSTER(HÖGER(D2;RAD($1:$99));1);"ABCDEFGHIJKLMNOPQRSTUVWXYZÅÄÖ")))) Skiter sig eftersom siffra=versal Siffra... 5= storbokstavs 5 Lägger man till ett villkor att den första bokstaven skall ingå i mängden ABC...ÅÄÖ så hittar den trots det alla postnummer som föregås av en versal. Texthantering passar helt enkelt inte i matrisformler.
  12. MH_resurrected

    Sortera ut text ur cell

    Så här ser snyggingen ut: =RENSA(HÖGER(BYT.UT(RENSA(A1);" ";REP(" ";99));99)) Vad man gör är att byta ut alla mellanslag mot 99 mellanslag (REP(" ";99)). Så Lilla Prinsgatan 15, 123 45 DROTTNINGHOLM blir någonting i stil med: Lilla Prinsgatan 15, 123 45 DROTTNINGHOLM (fast med 99 mellanslag. Det lär inte funka på Eforum...) Sen tar man helt enkelt de 99 högraste tecknen, som är en massa mellanslag + den text du vill ha. Och som sista steg kör man en RENSA som tar bart alla onödiga mellanslag. http://www.excelfox.com/forum/showthread.php/333-Get-Field-from-Delimited-Text-String Skitsmart, men om du har delade ortsnamn så löser det inte ditt problem + kan eventuellt vara lite beräkningstungt för dina 10kR (kiloRader).
  13. MH_resurrected

    Sortera ut text ur cell

    hitta sista mellanslaget? Tyvärr finns den ingen "sök från slutet"/InStrRev i excel. Så man får göra en ganska omständig variant. t.ex så här: Hur många mellanslag finns det? =LÄNGD(A1)-LÄNGD(BYT.UT(A1;" ";"")) Byt ut den sista förekomsten mot ett udda tecken (€ i mitt exempel) =BYT.UT(A1;" ";"€";LÄNGD(A1)-LÄNGD(BYT.UT(A1;" ";""))) Kolla vilken position € har: =SÖK("€";BYT.UT(A1;" ";"€";LÄNGD(A1)-LÄNGD(BYT.UT(A1;" ";"")))) och returnera allt till höger om den positionen (1+sök....)... =EXTEXT(A1;1+SÖK("€";BYT.UT(A1;" ";"€";LÄNGD(A1)-LÄNGD(BYT.UT(A1;" ";""))));100) den sista 100 är lite godtyckligt. Det är antal tecken man vill returnera. MEn om texten är kortare så slutar den innan. Det känns inte som om Ortsnamn brukar vara längre än 100 tecken. Det finns en mycket snyggare variant av "sök från höger" på nätet. Men jag kommer inte på rätt sökord. Oavsett så har du förmodligen ett problem. Att söka efter mellanslag fungerar inte inte på delade ortsnamn, typ: SÖDRA KRÄKÅNGER. Är det ett problem i dina data?
  14. MH_resurrected

    Uppdatera data i tabell

    ******************************** Ingen lösning, bara en återvändsgränd du slipper slösa tid på: Om det bara är siffror i datafälten kan du alltid lägga samman tabeller med hjälp av konsolidering. Förslagsvis pivottabell med konsolideringsområden ALT+D+P Men jag klarar inte av att få in villkoret att den senaste skall användas. Mycket märkligt... ******************************** Nej, det är monshis lösning som gäller (Kan det komma helt nya "individer" i tabell2? annars är det en ganska rättfram operation).
  15. Man skulle nästan kunna tro att några på IDG är trötta på all "2-faktors halleluja" https://computersweden.idg.se/2.2683/1.710395/google-konto-hacka Nåja. Så länge Bank-id håller tätt är jag nöjd.
×