Tag: 全局variables

VBA连接单元格从两列基于三分之一的标准: 我目前正试图根据第三列中存在的另一组数据来组合来自两个不同列的两组数据。在这种情况下，我需要G列（三字母代码的string）的基本国家标签连接到列H中存在的string的前面，提供string“Missing Audio”或“Missing Audio / Subs”在列F 我目前的固定variables是，所有的数据将从各列的第六行开始，但是它们将运行到一个不确定的点。我有各种各样的尝试代码，我很乐意发布，但没有一个似乎工作，我开始有一个印象，我已经过了复杂的过程在我脑海中，并创build一种编码器块！提供的任何帮助将大量赞赏正如在这里问的是我的尝试，试图拉入一个基本的连接脚本与variables的要求： Sub Notestidy() Dim w1 As Worksheet Dim c As Range, AC As String Dim rng As Range, rng2 As Range, iRow As Integer, iCol As Integer, i As Integer Application.ScreenUpdating = False Set w1 = Worksheets("Sheet1") Set rng = w1.Range("G6", w1.Range("G" & Rows.Count).End(X1up)) Set rng2 […]

基于variables格式单元格（行高，合并）？: 我意识到这是一个远射，但为什么不。我想用原始数据创buildSheet1： Class | Info 1 | Subject 2 | Topic 3 | Unique data 3 | Unique data 3 | Unique data 1 | Subject 2 | Topic 3 | Unique data 然后在Sheet2中，我想获得Class＃并相应地进行格式化： -If Class=1 then: 1 row, Top and Bottom border -If Class=2 then: Merge 2 rows of cells, text = 16pt, top […]

Excel（2010）VBA：将date作为variables并存储: 听起来很简单：只需将一个date存储在一个从单元格中获取的variables中。这就是我真正需要的。但是我不断收到一个“Object required”错误。我有一个名为单元格的variables，我需要的信息是左侧偏移两列和三列（所以-2和-3使用偏移量）。我曾尝试使用stringvariables并将其转换为CDate（），我已经尝试使用整数并将其存储在那里，我尝试了datevalue。我很茫然。这是我的代码的最新版本… Function daysBetween(percent, quarters, cell As Range) As Boolean 'this function returns true if the date is past the allotted time for the group cell.Select Dim target As String Dim issue As String Dim targetCell As Range Dim issueCell As Range Set targetCell = ActiveCell.Value Set targetCell = […]

Excel VBA – 使用variables＆COUNTAselect范围: Excel VBA – 使用variables＆COUNTAselect范围垂涎VBA国王和皇后区，我试图学习Excel VBA。一个简单的任务，我想要做的是select所有传染性细胞在我从销售收到的报告转储。简单的我很确定，但是我是VBA的初学者。好的报告信息：报告是一个列数（31）。尽pipe我想在代码中添加一些变化来适应列号的变化。报告每周增加行数，less一些，有时甚至更多。但总是从单元[ A4 ]开始。我虽然使用COUNTA函数来计算使用的行数，然后将其设置为一个variables。与行类似。这是我想出来的，虽然我得到了“ 运行时错误'1004'：object'_Global的方法'范围'失败…任何人都可以帮我” 。对我来说关键是要学习使用我需要完成的任务的VBA。我理解我的代码背后的逻辑，但不完全是编写它的写入方式。如果有人提出完全不同的代码，我可能会迷路。但我是开放的。 Sub ReportArea() Dim numofrows As Integer Dim numofcols As Integer Dim mylastcell As String Dim myrange As Range Worksheets("Sheet1").Select numofrows = WorksheetFunction.CountA(Range("AE:AE")) numofcols = WorksheetFunction.CountA(Range("4:4")) Set myrange = Range(Cells(4, 1), Cells(numofrows, […]

将Excel单元格作为variables读入Stata全局variables: 有几个面板数据集，我想join。这些数据集中的观察结果由idvariables和标识观察时间的variables来标识。所有的数据集都包括我需要的一些variables，有些我不需要也不会有相同的variables（不包括id和survey-time-variable）。数据集是巨大的，所以为了加速处理和减小最终数据集的大小，我想drop所有我不需要的variables。 Thoosevariables存储在具有多列的Excel文件中。其中一列，比如C2，包含我所有的variables名称。现在我相信我有两种可能的方式可以遵循，我按照我的喜好来描述： 1）将Excel文件中的variables名称读入Stata中的全局variables，然后声明： keep global varlist 这样只有variables我需要保留。 2）用Excel文件中的所有variables生成一个新的空数据集，然后 joinby id syear $varlist using dataset, update 无论如何，我需要从Excel文件中读出variables为全局variables。我意识到我可以通过从Excel复制粘贴到Stata中来实现这一点，但是我想随着工作的进行，variables会有一些变化，我想学习如何在Stata中正确编程。

VBA：从filter中检索数据并将其存储在variables中: 我在列标题“区域”上有一个filter，应用时只显示区域匹配应用的filter的logging，例如5。是否有一段代码将filter的值存储在variables中？ filter使用的代码是： ActiveSheet.Range("$A$3:$BN$197").AutoFilter Field:=2, Criteria1:= 所以我想要的是这样的： dim Filter As String Filter = ActiveSheet.Range("$A$3:$BN$197").AutoFilter Field:=2, Criteria1:= 但问题是因为它是一个filter，过滤区域可以改变，即一个用户可能过滤区域5，而另一个用户可能过滤区域4。

使用stringvariables而不是stringExcel VBA: 我对Excel VBA是全新的，已经花费了好几个小时的时间来使用stringvariables而不是写string。可能是一个非常简单的解决scheme，但我似乎无法find类似的情况，也没有做任何我试过的工作：s 我定义了一个variables名称NewSbWb（=“REQ1351”），如下所示 Dim NewSbWb As String NewSbWb = ActiveWorkbook.Sheets(1).Range("D2").Value 如果我然后使用如下function： Workbooks("REQ1351").Activate 要么 currentSheet.Copy Before:=Workbooks("REQ1351").Sheets(sheetIndex) 我想使用stringvariablesNewSbWb而不是写“REQ1351”。我希望你们中的一个能帮助我。提前谢谢了！

Excel VBA – 如何使用名称中的variables来打开用户窗体: 我试图打开某个用户窗体的基础上，在一个工作表的单元格的值。有17个用户窗体，所以我不想为每个表单使用17个if语句： If ActiveCell.Value = 1 Then UserForm1.Show End If 有没有一种方法可以使用variables来显示表单？我在想： Dim i Do If ActiveCell.Value = "" Then Exit DO End If i = ActiveCell.Value UserForms("UserForm" & i).Show ****THIS is what doesn't work ActiveCell.Offset(0,1).Select Loop 我只需要能够使用variables来调用用户窗体。这甚至有可能吗？在此先感谢您的任何答案/build议！ -大卫

通过variables引用工作表: 我想通过索引在工作簿中引用表格。 – 基本上，我想通过循环运行并清除几个工作表上的某些单元格。目前我写了一些vba，其中包括代码如下： Sheet36.Activate Range（“B3：T201”）。ClearContents 每次重复每张纸，例如：Sheet37.Activate Range（“B3：T201”）。ClearContents 所有的答案赞赏。

基于单元值的范围: 我需要代码来改变基于单元格值的范围：我可以得到它的行号取决于单元格的值，如下所示，但我需要的列值是可变的： For Nassets = 1 To ws_data.Range("d2") ws_data.Range("B" & Nassets).Value = 3 Next Nassets 如果"d2"的值为4 ，范围B1:B4 = 3 ，但是我想要范围B4:E4 = 3 提前致谢！