Using Dim is related by putting this statement at the start of the module in the public part .. So if you used this statement you will have to declare variables
Posts by BaraaKhalil
-
-
-
The code is put in standard module ... If the sheet name was H then when referring to the sheet, it should be Sheet("H")
and if you want to deal with column D you can refer to it
Try this modified codeCode -
And if want to do that in one shot you can test that code
Code -
-
-
Hello
Try this codeCode- Sub Test()
- Dim a As Variant
- Dim myAreas As Areas
- Dim i As Long
- Dim r As Long
- Dim x As Long
- For x = 1 To 4
- Sheets(x + 1).Cells.Clear
- Set myAreas = Sheets(1).Columns(x).SpecialCells(2).Areas
- r = 0
- For i = 1 To myAreas.Count
- a = myAreas(i).Value
- r = r + 1
- Sheets(x + 1).Range("A" & r).Resize(, UBound(a)).Value = Application.Transpose(a)
- Next i
- Next x
- End Sub
-
You're welcome. Glad I can offer some help
-
Have a look at this file
-
Right-click the sheet name >> View Code >> Paste the code and then test the any cell within your range .. The code is working well
If you still have a problem please upload sample of your workbook -
-
You're welcome. Glad I can offer some help
-
-
Thanks a lot ..
I just wanted an example of how using the UDF "GetRegistry" and "WriteRegistry" .. A simple example to know how to use the parameters correctly -
Thanks a lot Mr. Kenneth for this UDFs
Can you give us example of how to use those UDFs? -
I tried that but it doesn't fit the cell .. Thanks a lot for your reply
-
Thanks a lot for reply
I need to resize to fit the width and height of the cell that the image will be inserted in .. -
That's great Logit
Is it possible to add a feature of resizing the images inserted to the cells that will be inserted in? -
Hello
It is better to upload sample workbook with some desired output -
Cross-post at this link
https://chandoo.org/forum/thre…ts-and-update-both.36281/