Найти количество символов в ячейке Excel - C#

Узнай цену своей работы

Формулировка задачи:

Доброго времени суток. Вопрос. Нужно программно определить количество символов в каждой ячейки одного столбца, и если колличество символов не равно меньше 10 то добавить в начале ячейке, перед символами "0"(ноль), как это можно сделать? Прошу помочь. Ранее прогонял ячейки программно через прописывание в соседнем столбце ДЛСТР().

Решение задачи: «Найти количество символов в ячейке Excel»

textual
Листинг программы
  1. using System;
  2. using System.Collections.Generic;
  3. using System.Linq;
  4. using System.Text;
  5. using System.Threading.Tasks;
  6. using Excel = Microsoft.Office.Interop.Excel;
  7. using System.IO;
  8. using System.Runtime.InteropServices;
  9.  
  10. namespace ConsoleApplication3
  11. {
  12.     class Program
  13.     {
  14.         static void Main(string[] args)
  15.         {
  16.  
  17.             Excel.Application xlApp;
  18.             Excel.Workbook xlWorkBook;
  19.             Excel.Worksheet xlWorkSheet;
  20.             Excel.Range range;
  21.             Excel.Application ObjExcel = new Excel.Application();
  22.             Excel.Workbook ObjWorkBook;
  23.             Excel.Worksheet ObjWorkSheet;
  24.             string str;
  25.             int rCnt;
  26.             int cCnt;
  27.  
  28.             int rw = 0;
  29.             int g = 0;
  30.             int cl = 0;
  31.             xlApp = new Excel.Application();
  32.             xlWorkBook = xlApp.Workbooks.Open(@"C:\tariff02.xls", 0, true, 5, "", "", true, Microsoft.Office.Interop.Excel.XlPlatform.xlWindows, "\t", false, false, 0, true, 1, 0);
  33.             xlWorkSheet = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);
  34.             range = xlWorkSheet.UsedRange;
  35.             rw = range.Rows.Count;
  36.             cl = range.Columns.Count;
  37.             ObjWorkBook = ObjExcel.Workbooks.Add(System.Reflection.Missing.Value);
  38.             ObjWorkSheet = (Microsoft.Office.Interop.Excel.Worksheet)ObjWorkBook.Sheets[1];
  39.             for (rCnt = 1; rCnt <= rw; rCnt++)                              
  40.             {
  41.                 cCnt = 1;
  42.                 str = (string)(range.Cells[rCnt /* Номер строки */ , cCnt/* Номер столбца */] as Excel.Range).Value2;
  43.  
  44.                 if (str == null) continue;  
  45.                  if (str.Length > 10) ObjWorkSheet.Cells[rCnt, 1] = ("0" + str);
  46.                 else ObjWorkSheet.Cells[rCnt, 1] = (str);
  47.             }
  48.    
  49.             xlWorkBook.Close(0);
  50.             xlApp.Quit();
  51.             ObjExcel.Visible = true;
  52.             ObjExcel.UserControl = true;
  53.        
  54.         }
  55.        }
  56.       }

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

6   голосов , оценка 4 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы