worksheet

0熱度

1回答

我在我的工作表中寫了下面的代碼，所有的範圍都在這張表中。 Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("DistMatrix")) Is Nothing Then Dim out1() As Double out1 = OutStat(bucket(Tar

1熱度

1回答

指定多頁/字符串數組？

我正在使用一些旨在根據下拉菜單中的選擇隱藏/取消隱藏表格的代碼。安裝程序是： Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = Range("SelectCP").Address Then Select Case Target.Value Case "All"

-1熱度

2回答

將重複行移入另一個表

我正在尋找vba代碼，它應該根據所有列查找重複行並將這些行移動到另一個表。就像Excel刪除重複函數，但我想保留重複值在另一個工作表。任何幫助將不勝感激。在此先感謝。

1熱度

3回答

VBA Excel：非活動表單和未知的行數。如果單元格包含值，則執行計算並將新值插入同一行上的單元格中

我盡力搜索答案，但無法獲得所需內容。我對VBA很陌生，所以在這裏的幾個地方可能會出錯。。。我正在創建一個數據格式化程序，每次使用它時都會使用不同數量的記錄（行）處理數據。數據將位於非活動表單上。第一行有標題。我已經成功地使用類似的代碼來識別下面的代碼來確定其上有特定數據的行，並清除該行上其他單元格的內容。我提到E列的原因是因爲它是每個記錄中都有數據的唯一列。然後我必須找到BU列中有值的行，

0熱度

1回答

楓心不是執行的功能，但打印功能項

林在worksheetmode使用楓樹林我試着用楓輸入和2D輸入，我想轉我的基質A： A := `<|>`(`<,>`(1, .5, -2), `<,>`(.5, 9/4+b, 5+3*b), `<,>`(-2, 5+3*b, 18+9*b+4*a)); B:= Transpose(A); 當我exectute片我不明白的已翻譯的值，與輸入相同。所以我的矩陣看起來像我的輸入矩陣加上

0熱度

1回答

在VBA中聲明和初始化一個動態數組表格

我想在Excel中創建一個數組表格。每張工作表都有多個列和行，需要進行搜索，比較和填充。我無法創建工作表數組。我在＃27行不斷收到下標超出範圍錯誤。它發生在所有4張紙上，如果我註釋掉前面的那些。 Sub news() 'activate sheets Sheet1.Activate Sheet2.Activate Sheet3.Activate

0熱度

1回答

Excel - 合併不同結構的工作表

我有一個包含超過100個工作表的Excel工作表，所有這些工作表都有不同的結構（某些列在所有這些工作表中，但有些不在）。有沒有簡單的方法來合併他們共同的列的工作表？預先感謝您！

0熱度

2回答

使用循環隱藏列和多個工作表

我目前有一個循環，可以很好地隱藏基於多個下拉單元格的列。我也想添加代碼來隱藏基於相同的下拉列表的表單，但我不知道如何添加到我的For Each Cell In Range以適應這種情況。我粘貼了我必須隱藏下面的列。任何幫助將不勝感激。 Private Sub Worksheet_Change(ByVal Target As Range) Dim cell As Range For Each

2熱度

3回答

vba設置wksheet變量

我想爲第二個工作簿上的工作表設置一個變量（在最後一行上刪除一個對象錯誤，stamWs）。我已經有兩個工作簿的變量。我的代碼如下： Option Explicit Sub Kopie() Application.ScreenUpdating = False Const StBestand = "Stambestand.xlsm" Const Competenties = "Compet

0熱度

1回答

更改Excel中最後4個Excel工作表的選項卡顏色（VBA）

我從一個Perl腳本創建一個Excel電子表格，該腳本讀入多個文本文件以填充電子表格中的工作表。可以有不同數量的文本文件，因此可以創建不同數量的工作表。我想自動更改每個電子表格中LAST 4工作表的標籤顏色（如果有8個工作表創建，我想更改工作表5,6,7和8的標籤顏色。如果有9個工作表創建，我想要工作表6,7,8和9的更改選項卡顏色，等等）。先謝謝你。