Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Söker enn annan lösning att fylla exel ! från VB

Postades av 2005-09-14 13:21:42 - Per Höglund, i forum visual basic - allmänt, Tråden har 1 Kommentarer och lästs av 654 personer

söker en lösning på fyllning av arket, den som jag har är ej bra

Vill ha en typ autofill



Public Function VBINKORN(intab1 As String, utsokv As String, NROO As Integer, ifra As String, sp As Integer)
Dim ska As String
Dim spoj As New Collection
Dim Exscel As Object

Set Excel = GetObject(, "Excel.Application")
Exscel.Visible = True

With Exscel
.Worksheets(1).Range("a" & NROO + 220 & "") = intab1
.worksheets(1).Range("b" & NROO + 220 & "") = spejgan(0)
.Worksheets(1).Range("c" & NROO + 220 & "") = Time
.Worksheets(1).Range("d" & NROO + 220 & "") = Replace(a1, ".", ",")
.Worksheets(1).Range("e" & NROO + 220 & "") = Replace(a2, ".", ",")
.Worksheets(1).Range("f" & NROO + 220 & "") = Replace(a3, ".", ",")
.Worksheets(1).Range("g" & NROO + 220 & "") = Replace(a4, ".", ",")
.Worksheets(1).Range("h" & NROO + 220 & "") = "s5"
End With


End Function


Svara

Sv: Söker enn annan lösning att fylla exel ! från VB

Postades av 2005-09-14 20:16:41 - Ola Lindfeldt

Varför är den ej bra? Vad menar du med att det ska funka som ... Autofill??

Man kan få bättre prestanda om du bygger upp en sträng i minnet i VB programmet.
(se upp hur du bygger upp strängen dock. INTE så här:
s = s & NextField osv...)
Sen sätter du din String till Clipboarden och kör sen Worksheet.Paste() metoden.

Ola


Svara

Nyligen

  • 17:54 Vegastars New Zealand
  • 16:56 Verde Casino Danmark
  • 13:54 Vegastars: Top Australian Online C
  • 21:28 Chicken Road Casino Game
  • 21:21 1xBet Promo Code 2025
  • 18:37 Remove the bumper in AUDI
  • 15:35 Chicken road crash game
  • 21:41 Automotive Services UK

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 941
27 965
271 783
817
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies