- android - 多次调用 OnPrimaryClipChangedListener
- android - 无法更新 RecyclerView 中的 TextView 字段
- android.database.CursorIndexOutOfBoundsException : Index 0 requested, 光标大小为 0
- android - 使用 AppCompat 时,我们是否需要明确指定其 UI 组件(Spinner、EditText)颜色
我正在尝试使用 excel.Interop 将 excel 文件的每张纸转换为图像。到目前为止我所拥有的是
var a = new Microsoft.Office.Interop.Excel.Application();
try
{
Workbook w = a.Workbooks.Open(@"C:\Path\to\excelFile.xlsx");
foreach (Worksheet ws in w.Sheets)
{
string range = ws.PageSetup.PrintArea;
ws.Protect(Contents: false);
Range r = ws.UsedRange;
r.CopyPicture(XlPictureAppearance.xlScreen, XlCopyPictureFormat.xlBitmap);
Bitmap image = new Bitmap(System.Windows.Forms.Clipboard.GetImage());
string BitmapName = ws.Name;
image.Save($@"C:\Path\to\bitmapsToSave\{BitmapName}.bmp");
}
a.DisplayAlerts = false;
w.Close(SaveChanges: false);
}
finally
{
a.Quit();
}
我碰巧从剪贴板中获取了一张图像,它使用了 range.CopyPicture 方法。问题是我得到的范围包含一些空白单元格,我在某处读到,一旦访问一个单元格,即使它是空白的,也会扩展范围。
这意味着我的位图输出包含一个我不想要的空白偏移量。我正在尝试选择确切的范围,并且尝试了以下操作
Range r = ws.UsedRange.SpecialCells(XlCellType.xlCellTypeAllFormatConditions);
这会返回没有标题的表格。不知道为什么,跟他们被冻着有关系
我还尝试在将范围复制到剪贴板之前清除格式表
ws.Columns.ClearFormats();
ws.Rows.ClearFormats();
这工作正常,但我的表格现在失去了它所有的漂亮格式。 (这也意味着这适用于非格式化表格,这很好)
我正在尝试将 ws 实例复制到一个新实例中,从中获取已清除的范围,然后将其复制到实际工作表中,但我无法正确访问它们
//creates a copy of the worksheet to extract its range
Worksheet _ws = ws;
//These two lines do the magic.
_ws.Columns.ClearFormats();
_ws.Rows.ClearFormats();
Range _r = _ws.UsedRange;
//Copies range of aux ws into current ws
_r.Copy(r);
这将返回与前一个案例相同的输出,一个正确的裁剪范围,但图像没有 excel 格式。
我没有尝试过的最后一件事是访问打印区域并以某种方式将其转换为一个范围,这是因为我不知道为什么。
我想知道如何执行此操作或我做错了什么。
编辑:
基本上与互操作
opens an excel file with a table on each sheet
for each sheet get UsedRange of sheet as a Range object
pass that range into clipboard
using Copypicture save Clipboard to a bmp image
close file
interop 选择的范围大于实际包含数据的范围,因为如果我单击一个单元格并删除其内容,仍将被视为它包含数据。
这导致位图包含我的表格,但周围也有很多白色单元格,因为它们曾经有数据,但现在没有了。
最佳答案
我假设它与 UsedRange
返回的范围有关。此方法似乎可以正常工作,但我的理解是,该方法可能会返回在所用范围的顶部、底部和/或左侧或右侧有空列的空行的范围。您在下面的评论描述了这种情况。
_” I read somewhere that once a cell is accessed will extend the range even if it's blank.”
我个人从未经历过这种情况,当这种情况确实发生在其他人身上时……在我见过的几乎所有情况下,当一个看似空的单元格具有某种不“正常”的格式或不可见字符时,问题就会得到解决。如果使用的范围返回实际数据上方、下方或左侧的空行或空列,则其中一个单元格中有内容。此外,应该清楚哪个单元格具有这种不可见的数据或格式。示例:
如果在使用范围的顶部有“明显的”空行或在使用范围的左侧有“明显的”空列,那么 TOP/LEFT 单元格要么有不可见的数据,要么有某种不“正常”的数据该行和/或列中一个或多个单元格的单元格格式。
如果在使用范围的底部有“明显的”空行或在使用范围的右侧有“明显的”空列,那么底部/右侧单元格要么有不可见的数据,要么有某种不“正常”的数据该行和/或列中一个或多个单元格的单元格格式。
打开 Excel 工作表并选择上面的问题单元格之一以删除任何数据并清除所有格式,将至少删除空行、空列或两者。
检查那些“明显”的空单元格。删除内容,清除所有格式,看看使用的范围是否没有按预期工作。
编辑:删除多余的行和列
由于有太多的事情会导致 usedRange
属性返回这些空行和空列,这包括合并的单元格,最简单的方法是完全“删除”单元格.幸运的是,这些图片显示了您需要删除多少行或列。
以您发布的链接中名为 Cont4
的工作表为例,UsedRange
在右侧返回十 (10) 个额外的空列,在底部返回 39 个空行.我在 col AA
某处发现了一个合并的单元格。我们可以尝试在逐个单元格的基础上找出导致此问题的原因,但是简单地选择从“R”列到“AA”列或任何 PAST 列“AA”列的所有列可能更容易。换句话说,选择数据右侧的 10 列或更多列。选择这些列后,右键单击选择并选择“删除”。这显然应该删除这些单元格中的任何类型的格式/合并并解决问题。同样的事情适用于底部的空行,选择数据下方至少 39 行或更多行,然后右键单击选择并选择“删除”。
顶行有点不同。如果工作表顶部有一个或多个空行,则 UsedRange
将返回一个额外的顶部空行。除非我删除所有空的顶行,否则我无法摆脱这个额外的顶行。
最后,我在上一条评论中指出的代码将删除这些空行和列以及顶部的额外行,因为它完全忽略了格式设置和合并,并且将删除任何完全空的行而不考虑格式设置。只要您拥有适合您的代码,那么这就是最重要的。祝你好运。
关于c# - 检索不使用空白单元格的 UsedRange,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/42930265/
我是 VBA 新手,还无法弄清楚如何立即从工作表中选择和删除“非UsedRange”(即将UsedRange 从单元格A1 开始)。 换句话说,我需要一个动态解决方案来将可变大小的 UsedRange
不知道我错过了什么,但我看到的发布的示例似乎不起作用。 我从网络查询导入数据。我将查询设置为在重新查询时清除未使用的单元格。 我使用此导入的数据生成可变长度的报告。 但是,如果用户(在我的情况下需要这
我有一个 22 行的表,我只想通过 B 列。由于某种原因,我的循环超出了 22 行并达到了 259。 代码 Debug.Print "Starting..." Dim tempRange As Ran
每次使用UsedRange时,我都会遇到问题。我的代码中有这个: Sheets("Campaign").UsedRange 'Refresh UsedRange LastRow = Sheets("C
我使用 Excel.Worksheet 对象的 UsedRange 属性来获取行数和列数。如果我尝试删除列或行,UsedRange 计数应相应减少。但是,经过大量调试,按一定顺序更改列的 Hidden
我正在尝试使用 excel.Interop 将 excel 文件的每张纸转换为图像。到目前为止我所拥有的是 var a = new Microsoft.Office.Interop.Excel.App
我正在使用 UsedRange 属性。 我明白了 Run-time error '91': Object variable or With block variable not set. 我已经在这里
摘要:我从一张表中取出一行数据并将其粘贴到另一张表中,但是该表将是一种日常使用的东西,新数据只是在旧数据下方输入。 问题:在每次新运行时,都会将 7 添加到 UsedRange.Count .例如:一
我需要将 UsedRange 从七个已关闭文件复制到新工作簿。每个源文件大约 200M,因此我想在不打开它们的情况下提取信息。 我从这个网站 https://www.rondebruin.nl/win
尝试编写范围函数的联合 我得到“对象变量或未设置 block ” 我没有做对(我认为): With Rng UnionRange = Intersect(ws.UsedRange, Rng
我正在使用 C# 中的 Excel Office Interop。 (在 VS 2013 中)。我正在使用 Excel 工作簿,该工作簿是在 Office 2010 Professional Plus
我正在使用 Excel-DNA 在 Excel 中开发一些 UDF。从 Excel 传递到我的 UDF 的参数之一是一个范围。当使用特定范围(例如“A1:C50”)时,UDF 可以正常工作。以下是我的
我正在尝试将 excel 电子表格读入内存,但是当我使用 worksheet.UsedRange.Rows.Count 时,返回的值不正确。我的电子表格中有 1670 行数据,但行数返回 694 行。
我需要帮助解决以下问题: 如何通过在 Excel VBA 中指定范围或无限范围而不是使用 UsedRange 来清除单元格填充颜色清除填充颜色? Worksheets("Sheet2").UsedRa
在 VB.NET 中,我想获取使用过的行,所以我写道: Dim objWorksheet As Excel.Worksheet = workbook.Sheets(2) Dim lastRow = o
我用过Cells(1,1).EntireRow.InteriorColor.Color突出显示整行,现在我需要清除 UsedRange 范围之外的所有内容的格式.有没有办法做到这一点? 每当我用谷歌搜
我的工作表上有大约 50 行,我正在使用 VBA 宏对其进行编辑。 当我以以下格式存储最后使用的行时 NewLastRow = ActiveSheet.UsedRange.Rows.Count New
看一下下面的代码。基本上,这是一个被调用的函数,用于识别工作表的使用范围、循环该范围并散列社会安全号码。 问题就在这里。如果我创建一个电子表格并填充一个单元格,该函数不会对该单元格进行哈希处理。但是,
我有一些来自经纪人的输入数据。我编写了一些代码来自动计算、添加列并插入一些公式。 最后,我想做一些条件格式化(影响整行)来确定有利可图的交易(绿色字体整行)和丢失的交易(红色字体整行)。 为此,我使用
ActiveSheet.UsedRange.Columns.Count - 8 在 vba 中意味着什么? vba如何知道usedRange? 最佳答案 这是 UsedRange ( MSDN ref
我是一名优秀的程序员,十分优秀!