]] XL-mania [[ get external data (berulang2)

 

Dear para suhu excel..
saya lagi belajar import data ni (lagi)
langsung ajah
saya coba2 ngeRECORD macro untuk import data (modul1 pada lampiran saya)

Sub import1()

'

' Macro1 Macro

'

'

With ActiveSheet.QueryTables.Add(Connection:="URL;http://www.suzukibali.com/pricing.html",
Destination:=Range("$A$10"))

.Name = "harga mobil suzuki"

.FieldNames = True

.RowNumbers = False

.FillAdjacentFormulas = False

.PreserveFormatting = True

.RefreshOnFileOpen = False

.BackgroundQuery = True

.RefreshStyle = xlOverwriteCells

.SavePassword = False

.SaveData = True

.AdjustColumnWidth = True

.RefreshPeriod = 0

.WebSelectionType = xlEntirePage

.WebFormatting = xlWebFormattingNone

.WebPreFormattedTextToColumns = True

.WebConsecutiveDelimitersAsOne = True

.WebSingleBlockTextImport = False

.WebDisableDateRecognition = False

.WebDisableRedirections = False

.Refresh BackgroundQuery:=False

End With

End Sub

dan langkah tersebut sudah berhasil
lalu yg saya inginkan tahu, bagaimana caranya mengImport dari alamat
(URL) yg ada di suatu cell di worksheet kita, contohnya pada cell A1
s.d A7..dan cara kerja-nya
1.import dari alamat di cell A1,lalu taruh di cell A10 (misalnya)
2.import dari alamat di cell A2,lalu taruh dibawah cell(row) terakhir
dari hasil import pada langkah pertama
dst
mohon maaf kalo kurang jelas
sekian terima kasih,

__._,_.___

Reply to sender | Reply to group

Messages in this topic (1)

Recent Activity:

• New Members 73

Visit Your Group Start a New Topic

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Momods belum sarapan nih... Huhuhuhu...                           |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+

MARKETPLACE

Going Green: Your Yahoo! Groups resource for green living

---

Parenting Zone: Your community resource for family and home

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

.

__,_._,___