Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > it.comp.lang.visual-basic > #18823

Dati in excel

Show all headers | View raw

Ciao a tutti,
sto sviluppando un'app in Visual Studio 2010 che deve leggere i dati in arrivo da una bilancia e poi deve metterli in Excel.

I dati dalla bilancia li leggo e li metto in una TxtBox multiline
Il file di Excel lo creo ed inserisco i dati letti

Devo però sistemare 2 cose:
Nella TxtBox, i dati da bilancia arrivano con l'aggiunta della lettera g (grammi)

8,93 g
7,58 g
...
...

vorrei togliere la g, il codice di popolamento TxtBox è questo:

Private Sub UpDateText(ByVal [Text] As String)

        If Me.RicDati.InvokeRequired Then
            Dim Cmp As New SetTextCallback(AddressOf UpDateText)
            Me.Invoke(Cmp, New Object() {(Text)})
        Else
            Me.RicDati.Text &= [Text]

            Me.Conteggio.Text = Me.RicDati.Lines.Count - 1

        End If

    End Sub

volevo sostituire Me.RicDati.Text &= [Text]con qualcosa tipo questo ma non funziona:
'Me.RicDati.Text &= Microsoft.VisualBasic.Right([Text], 1)

la 2° domanda è questa:
in Excel mi mette tutti i dati nella cella A1 mentre dovrebbe mettere il 1° nella A1, il 2° nella A2 ecc...

Questo il codice che gestisce Excel:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim Xl As New Excel.Application
        Dim xlBook As Excel.Workbook

        xlBook = Xl.Workbooks.Add
        xlBook.Worksheets(1).activate()

        xlBook.Worksheets(1).cells(1, 1) = Me.RicDati.Text.ToString
        Xl.Visible = True

    End Sub

mi potete dare una mano?
grazie
Marco

Back to it.comp.lang.visual-basic | Previous | Next — Next in thread | Find similar

Thread

Dati in excel Marco75 <marcoporzi75@gmail.com> - 2016-06-24 02:09 -0700
  Re: Dati in excel Antologiko <antologiko@gmail.com> - 2016-06-24 21:10 -0700
    Re: Dati in excel Antologiko <antologiko@gmail.com> - 2016-06-24 21:15 -0700

csiph-web