2011-07-01 2 views
0

J'ai une colonne 'A' dans la feuille de calcul 'deux' et une autre colonne 'B' dans la feuille de calcul 'un'!Copier Formatage conditionnel dans Excel à l'aide de VB.net?

Je veux copier le formatage conditionnel de la colonne A en deux à la colonne B en un! Fondamentalement, je veux copier tout de la colonne A dans deux à la colonne B en un, sauf les données!

S'il vous plaît aider !!

J'ai:

sheetA & sheetB object as Objects in my code 
I am using VB.NET 

Je suis un débutant dans Vb.net - S'il vous plaît aider!

+0

Qu'avez-vous essayé jusqu'ici? Il sera plus facile de vous aider si vous faites une tentative et de poster ce que vous avez essayé. – jonsca

Répondre

0

est ici un peu poussée:

oExcel = CreateObject("Excel.Application") 
    Book = oExcel.Workbooks.Open("C:\Users\Jonathan\Documents\Test2.xlsx") 
    Sheet = Book.Worksheets(1) 
    SourceRange = Sheet.Range("A1:A" & Sheet.Range("A1").End(Excel.XlDirection.xlDown).Row) 
    DestRange = Sheet.Range("D1:D" & Sheet.Range("D1").End(Excel.XlDirection.xlDown).Row) 

La viande de c'est cette partie, où vous prenez les conditions de format d'une plage et d'ajouter à l'autre. Cela suppose qu'il n'y a qu'un seul critère pour le formatage. Plus d'un, il faudrait que vous enjamber tous (je pense qu'il ya jusqu'à 3) à l'aide SourceRange.FormatConditions (i) dans une boucle de 1 à SourceRange.FormatConditions.Count

DestRange.FormatConditions.Add(Excel.XlFormatConditionType.xlCellValue, SourceRange.FormatConditions(1).Operator, SourceRange.FormatConditions(1).Formula1) 
    DestRange.FormatConditions(1).Interior.ColorIndex = SourceRange.FormatConditions(1).Interior.ColorIndex 
+0

Cela m'a vraiment aidé! –

+0

@Yugal Content de l'avoir fait. J'ai beaucoup appris en formulant la réponse! – jonsca

Questions connexes