Hirdetés
- iPhone topik
- Yettel topik
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Vivo X300 Pro – messzebbre lát, mint ameddig bírja
- Külföldi prepaid SIM-ek itthon
- Telekom mobilszolgáltatások
- Samsung Galaxy Watch5 Pro - kerek, de nem tekerek
- Töltő már van a Galaxy S26 Ultrához
- Milyen okostelefont vegyek?
- Mozgás közben is megtalálhatod az Apple új nyomkövetőjét
Új hozzászólás Aktív témák
-
pmonitor
aktív tag
válasz
pmonitor
#10199
üzenetére
Ha a kijelölt cellák sor- és oszlopszámát szeretnéd lekérdezni C#-ból (Interop DLL nélkül), akkor az alábbi COM Wrapper alapú megoldás működik:. És a "ColumnLetterToNumber" metódus:
var selection = ComInvoker.GetProperty<object>(excel!, "Selection");
var areas = ComInvoker.GetProperty<object>(selection, "Areas");
int areaCount = ComInvoker.GetProperty<int>(areas, "Count");
for (int a = 1; a <= areaCount; a++)
{
var area = ComInvoker.GetProperty<object>(areas, "Item", new object[] { a });
var cellsInArea = ComInvoker.GetProperty<object>(area, "Cells");
int count = ComInvoker.GetProperty<int>(cellsInArea, "Count");
for (int i = 1; i <= count; i++)
{
var cell = ComInvoker.GetProperty<object>(cellsInArea, "Item", new object[] { i });
string address = ComInvoker.GetProperty<string>(cell, "Address"); // pl. "$B$3"
var match = Regex.Match(address, @"\$([A-Z]+)\$(\d+)");
if (match.Success)
{
string colLetter = match.Groups[1].Value;
int row = int.Parse(match.Groups[2].Value);
int col = ColumnLetterToNumber(colLetter);
Console.WriteLine($"Cell #{i}: Row={row}, Column={col}");
}
}
}int ColumnLetterToNumber(string col).
{
int sum = 0;
foreach (char c in col)
{
sum *= 26;
sum += (char.ToUpper(c) - 'A' + 1);
}
return sum;
}
Ez a megoldás a [ComAutoWrapper] NuGet-csomagot használja (Interop DLL nélkül is működik).Ezt a ChatGpt oldotta meg több próbálkozás után.
Új hozzászólás Aktív témák
● ha kódot szúrsz be, használd a PROGRAMKÓD formázási funkciót!
- HIBÁTLAN iPhone 12 Mini 64GB Green -1 ÉV GARANCIA - Kártyafüggetlen, MS3453
- GYÖNYÖRŰ iPhone 15 Pro Max 256GB Blue Titanium-1 ÉV GARANCIA - Kártyafüggetlen, MS4240
- Huawei P30 Lite / 4/128GB / Kártyafüggetlen / 12Hó Garancia
- Gamer PC- Számítógép! Csere-Beszámítás! R5 5500 / RX 6700XT 12GB / 16GB DDR4 / 1TB Nvme SSD
- magyar billentyűzet - 121 - Lenovo Legion Pro 5 (16ARX8) - AMD Ryzen 7 7745HX, RTX 4070 - 4 év gar
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: ATW Internet Kft.
Város: Budapest


