Sub Copy_sheets()
Dim Sh1, Sh2 As Worksheet
Set Sh1 = Worksheets("Sheet1")
Set Sh2 = Worksheets("Sheet2")
For i = 1 To 1000
Sh2.Range("A" & i).Value = Sh1.Range("A" & (i - 1) \ 18 + 1).Value
Next
End Sub
The days argument is the number of days in the future or past to calculate a workday. Use a positive number for days to calculate future dates, and a negative number for past dates. https://exceljet.net/excel-functions/excel-workday-function
row=5
Do while (IsEmpty(cells(row, 1).value) = false)
If (cells(row,1).value & cells(row,2).value & cells(row,3).value = text & text & text) Then
Rows(row).EntireRow.Delete
else row++
endif
loop
守候日落
2022-8-30 23:21:07
row=5前加返一句
text = range("A2").value
Ads
PeterStrange
2022-8-30 23:24:53
:^(
:^(
:^(
轟轍輟轎轤轒軌䡹
2022-8-30 23:25:47
alternative (non-VBA):
加一個column做indicator
"=and(a5="XXX",b5="XXX", C5="XXX")"
filter -> "True"
highlight 全部row
Go To (Ctrl+G / F5) -> Visible cells only
Ctrl + -
荃倉SQQQ
2022-8-31 01:38:45
hi 想問excel 如果唔同sheet 我想搵返某一行幾個cell的數值係唔係喺另一張sheet duplicated, 應該用咩formula?
for example： sheet1 有3個column
column A 係currency, column b 係principal, column c 係 interest amount
If(Mod(row(),18)=2,offset(sheet1!a1,int(row()/18)+1,0),a1)