Я написав код, щоб отримати копію робочих листів до нового файлу excel. Нижче мій код C #, проблема в тому, що деякі названі клітини відсутні, і я перевірив це в Excel-2010.
Код C #:
string strPath=@"C:NewFoldersomexcelfile.xls";
Excel.Workbook souWorkbook = xCel.Workbooks.Open(strPath);
Excel.Workbook destWorkbook = xCel.Workbooks.Add();
foreach (Excel.Worksheet wkSheet in souWorkbook.Worksheets)
{
wkSheet.Copy(destWorkbook.Worksheets[1]);
}
destWorkbook.SaveCopyAs("C:NewFoldercopy.xls");
Відповіді:
0 для відповіді № 1Якщо вам потрібно скопіювати названі комірки, ви можете використовувати наступний зразок коду
Sub Copy_All_Defined_Names()
" Loop through all of the defined names in the active
" workbook.
For Each x In ActiveWorkbook.Names
" Add each defined name from the active workbook to
" the target workbook ("Book2.xls" or "Book2.xlsm").
" "x.value" refers to the cell references the
" defined name points to.
Workbooks("Book2.xls").Names.Add Name:=x.Name, _
RefersTo:=x.Value
Next x
End Sub