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

Ralle1

Medlem
  • Antal inlägg

    51
  • Gick med

  • Senaste besök

  1. Ja. Fast inte 2010 som jag skrev utan 2000.
  2. Lite kryptisk rubrik kanske. Jag har en tabell bestående av namn, gatuadr, postadr, telefonnummer, SÖKNAMN och FÖRETAG, det är fälten. Jag skulle vilja skriva ut en rapport med fyra poster i bredd. Typ så här: namn namn namn namn gatuadr gatuadr gatuadr gatuadr postadr postadr postadr postadr telefonnummer telefonnummer telefonnummer telefonnummer Det fungerade Access 2010 men när jag bytte till 2013 fungerar inte rapporten längre. Är det någon som har tips på vad jag kan göra? MVH Ralle
  3. Nu fungerade det helt plötsligt. Man blir inte klok på datorer. Tack för att du försökte hjälpa mig. MVH Ralle
  4. Jag har gjort det. Det måste vara något jag gjort fel, men vad? Jag kanske ska skriva att mappar o filer inte ligger under wwwroot. Det fungerade på min förra dator, men jag kommer ju inte ihåg hur jag gjorde då. MVH Ralle
  5. Är det någon som kan ge mig ett tips hur jag ska slippa det? MVH Ralle
  6. Hej! Jag är tyvärr lite stressad med arbetsuppgiften så därför har jag inte tid att sätta mig in i råden du gav mig. Men makrot fungerar hjälpligt nu, så jag TACKAR dig för hjälpen. MVH Ralle
  7. Hej! Tack för hjälpen med summeringarna. Det är så här att jag skulle vilja ha summeringarna på samma rad som den sista Proj respektive Finans, som det är nu kommer summeringen på raden under, går det att fixa det? Det här med VBA är jag inte så haj på, eftersom det fungerar någorlunda så törs jag inte rota allt för mycket i koden. MVH Ralle
  8. Cells(i, 9).FormulaR1C1 = [GRÅ]"=SUM(R["[/GRÅ] & j - i & [GRÅ]"]C:R[-1]C)"[/GRÅ] Det är den här och dom andra summeringarna jag har problem med. Summeringarna ska placeras i KOLUMN 9, problemet blir att den letar belopp i den kolumnen som jag vill att den ska skriva ut summeringarna, men alla belopp ligger i kolumn 7. Hur får man den att räkna ut summa från belopp i kolumn 7 och lägga in den i i kolumn 9? MVH Ralle [inlägget ändrat 2007-03-21 09:49:46 av Ralle1]
  9. Hej! Jag har problem med summeringar av kolumn projekt och finans och så en totalsummering. Så här ser kolumnrubrikerna ut: KONTO KST VERK FINANS MP PROJ Pub/BELOPP Jag vill alltså ha summering så fort PROJ och FINANS ändras. Sub Inläsning_projekt_fil() ' ' Inläsning_projekt_fil Makro ' Makrot inspelat 2004-02-16 av ' ' Kortkommando: Ctrl+i ' Dim i As Integer Dim j As Integer i = 2 j = 2 chosenfile = Application.GetOpenFilename("text-filer (*.prn), *.prn") If chosenfile <> False Then MsgBox "Öppnar " & chosenfile Do lngIndex = InStr(chosenfile, "\") If lngIndex = 0 Then Exit Do chosenfile = Right$(chosenfile, Len(chosenfile) - lngIndex) Loop Workbooks.OpenText chosenfile, Origin:=xlWindows, _ StartRow:=1, DataType:=xlFixedWidth, FieldInfo:=Array(Array(0, 1), Array(18, 1), Array(39, 1), Array(51, 1), Array(79, 1), Array(92, 1), _ Array(110, 1)), TrailingMinusNumbers:=True Columns("A:G").Select Selection.Sort Key1:=Range("D2"), Order1:=xlAscending, Key2:=Range("F2") _ , Order2:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom Range("A3").Select Columns("A:A").ColumnWidth = 8.71 Columns("A:A").EntireColumn.AutoFit Columns("E:E").ColumnWidth = 8.71 Columns("E:E").EntireColumn.AutoFit Columns("F:F").ColumnWidth = 11.6 Columns("G:G").ColumnWidth = 13# Columns("G:J").Select Selection.NumberFormat = "#,##0.00_ ;[Red]-#,##0.00 " Range("A1").Select While Not IsEmpty(ActiveSheet.Cells(j, 4)) While ActiveSheet.Cells(i, 4).Value = ActiveSheet.Cells(j, 4).Value i = i + 1 Wend Cells(i, 9).FormulaR1C1 = "=SUM(R[" & j - i & "]C:R[-1]C)" i = i + 1 j = i Wend i = 2 j = 2 While Not IsEmpty(ActiveSheet.Cells(j, 6)) While ActiveSheet.Cells(i, 6).Value = ActiveSheet.Cells(j, 6).Value i = i + 1 Wend Cells(i, 8).FormulaR1C1 = "=SUM(R[" & j - i & "]C:R[-1]C)" i = i + 1 j = i Wend While Not IsEmpty(ActiveSheet.Cells(j, 7)) While ActiveSheet.Cells(i, 7).Value = ActiveSheet.Cells(j, 7).Value i = i + 1 Wend Cells(i, 10).FormulaR1C1 = "=SUM(R[" & j - i & "]C:R[-1]C)" i = i + 1 j = i Wend End If End Sub Skulle vara väldigt TACKSAM för hjälp. MVH Ralle
  10. Förlåt, glömde ju det. Access. Jag har provat DISTINCT, men vet inte hur jag ska få med idnumrena. Det varierar från ett nummer till sex. MVH Ralle [inlägget ändrat 2006-09-07 23:02:59 av Ralle1]
  11. Jag skulle behöva hjälp med en SQL som dels visar spelare en gång oavsett hur många gånger dom finns med i tabellen "Trupp", sen hämtar idnummret respektive spelare har i tabellen. Så här: Förnamn Efternamn Position IdNr1 IdNr2 IdNr3 o.s.v. Det finns spelare som har flera id. Tabellen "Trupp" ser ut så här: Id Fornamn Efternamn Position Hoppas ni förstår vad jag menar. TACK på förhand. MVH Ralle
  12. Du ska ha stort TACK för hjälpen. MVH Ralle
  13. Hej! Din hjälp har varit ovärderlig, jag är väldigt tacksam, det fungerar perfekt. Men när jag skulle visa mitt arbete för kollegan som ska använda den, så visade det sig att kolumn G som innehåller belopp, skulle ha ören. Det ser man inte i filen, så när man läser in den så visas den utan ören. Frågan är då, hur gör man för att få ett "," framför dom två sista siffrorna? Beloppen visas t.ex. så här: 16800 Istället för så här: 168,00 MVH Ralle
  14. Jo, jag gjorde det. Men förstod nog inte riktigt hur jag skulle göra. Jag skrev ";" istället för "," då blev det fel. MVH Ralle
  15. Så, nu har jag börjat få lite ordning på det hela. Men eftersom hela raden ska läggas in, där dom olika värdena ska läggas in i egna kolumner så skulle jag behöva veta hur jag byter kolumn också. Så här ser ju raden ut för att byta rad: ActiveCell.Offset(1).Select Hur ska jag göra för att den ska byta kolumn? MVH Ralle [inlägget ändrat 2005-03-09 10:37:43 av Ralle1]
×
×
  • Skapa nytt...