MS SQL Server
  1. MS SQL Server
  3. Ajuster la largeur de colonne à l'aide de SSIS ETL sur Visual Studio
Intereting Posts
Changements de données dans un CTE après une requête SELECT Comment puis-je modifier une colonne que j'ai créée il y a un moment dans sql à key étrangère Agrégation de colonnes dans un PIVOT Renvoie le résultat de la requête sélectionnée uniquement si elle n'est pas vide Archive et restauration d'loggings relationnels de database Vue SQL. Sélectionnez le count … Où COALESCE dans la sous-requête renvoie toujours DBnull Nom de database spécifié avec l'année précédente SQL Server Vs MongoDB: test de vitesse? Insérer dans une table basée sur deux autres valeurs de table; Serveur SQL Message d'erreur personnalisé SQL Server Agent Job Quel process va pirater un port tcp? SQL Server 2008 Quel est le meilleur moyen de transmettre un DataTable dans une procédure stockée? Pourquoi notre pool de connections est-il fermé?

Ajuster la largeur de colonne à l'aide de SSIS ETL sur Visual Studio

Je crée un ETL sur Visual Studio, mais lorsque j'exporte mes données vers un tableau Excel, les colonnes semblent un peu courtes. Existe-t-il un moyen d'ajuster automatiquement la largeur de la colonne à partir de Visual Studio? Je vous remercie

Mise à jour 1

Voici le code que j'ai copié et aussi l'erreur que je reçois

Code

Erreur

Vous pouvez y parvenir en utilisant une script task qui s'exécute après le succès de la DataFlow Task . Vous devez append l'assembly Microsoft.Office.Interop.Excel aux references de tâche de script et utiliser le code suivant: (utilisé Vb.Net)

Remarque: vous devez append le file Microsoft.Office.Interop.Excel.dll aux directorys suivants (directory dll .Net Framework) C: \ Windows \ Microsoft.NET \ Framework \ v2.0.50727 et (directory de dll des outils de données du server sql) C: \ Program Files \ Microsoft SQL Server \ 100 \ DTS \ Binn (en utilisant vs 2005 et sql 2008), puis ajoutez cette DLL comme reference dans votre tâche de script 

 Imports Microsoft.Office.Interop Public Sub Main() Dim strFile as Ssortingng = "C:\New Folder\1.xls" Dim m_XlApp As New Excel.Application Dim m_xlWrkbs As Excel.Workbooks = m_XlApp.Workbooks Dim m_xlWrkb As Excel.Workbook m_xlWrkb = m_xlWrkbs.Open(strFile) 'Loop over all worksheets For Each m_XlWrkSheet As Excel.Worksheet In m_xlWrkb.Worksheets 'Columns m_XlWrkSheet.UsedRange.Columns.AutoFit() 'Rows m_XlWrkSheet.UsedRange.Rows.AutoFit() Next m_xlWrkb.Save() m_xlWrkb.Close(SaveChanges:=True) m_XlApp.Quit() End Sub