Visualizzazione dei risultati da 1 a 3 su 3
  1. #1

    Esportare dati in Excel

    Ciao a tutti.
    Premetto che non sono un grande sperto di VB6 quindi se riuscite a rispondere al mio quesito vi prego di portare pazienza nel caso avessi qualche dubbio che per voi è una banalità.
    Il mio problema è il seguente:
    Io devo estrarre dei dati da un file di testo tramite un programma in Visual Basic, dopodichè li devo elaborare e successivamente immettere dentro ad un foglio excel.
    L'estrazione dei dati dal file di testo è abbastanza banale e non è un problema.
    Il mio problema è immettere i dati elaborati in un foglio excel.
    Mi spiego: l'utente del programma dovrebbe soltanto selezionare alcuni parametri necessari ad indentificare una zona di celle in un foglio prestabilito di un file conosciuto dal programma.
    Non so nemmeno se sia possibile però se lo fosse vorrei sapere come aprire un file excel in scrittura e successivamente indicargli dove scrivere i dati senza ovviamente scriverli a mano.
    Grazie a tutti comunque...
    Mala The Best

  2. #2
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,465
    Hai fatto una ricerca sul forum?
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

  3. #3
    Utente di HTML.it
    Registrato dal
    Sep 2006
    Messaggi
    11
    Ti scrivo qualcosa utilizzato da me per creare/compilare un foglio excel.....


    'apertuta foglio excel
    Set xl = CreateObject("Excel.Sheet")
    xl.application.Workbooks.Open .......(percorso e nome del file)....
    Set xlWork = xl.application.Workbooks(NomeFileExcel)

    Set xlSheet = xlWork.Worksheets(1)

    'per scrivere testo in una perticolare cella
    xlSheet.Cells(Riga, col).Value = Testo

    '(per impostare le proprietà di un range di celle/colonne)
    xlSheet.Range("A1:G2").mergecells = True
    xlSheet.Range("A1:G2").WrapText = True

    'per salvare ciò che hai creato
    xl.application.Workbooks(NomeFileExcel).Close SaveChanges:=True

    'distruggere le variabili
    Set xl = Nothing
    Set xlWork = Nothing

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.