Excel 関連情報 †
サンプルコード †
縦軸と横軸を入れ替えるサンプル †
' 縦軸と横軸を入れ替えるサンプル
Sub XYSwap()
Const X_MAX = 5 ' X軸の最大値
Const Y_MAX = 5 ' Y軸の最大値
Const X_BASE = 2 ' X軸のベース
Const Y_BASE = 13 ' Y軸のベース
Dim nX
Dim nY
Dim nValue
' 横軸(X軸)のループ
For nX = 0 To X_MAX - 1
' 縦軸(Y軸)のループ
For nY = nX To Y_MAX - 1
' 座標をスワップ
nValue = Cells(nY + Y_BASE, nX + X_BASE)
Cells(nY + Y_BASE, nX + X_BASE) = Cells(nX + Y_BASE, nY + X_BASE)
Cells(nX + Y_BASE, nY + X_BASE) = nValue
Next
Next
End Sub
- 実行前
| 1 | 2 | 3 | 4 | 5 |
1 | 1 | 2 | 3 | 4 | 5 |
2 | 6 | 7 | 8 | 9 | 10 |
3 | 11 | 12 | 13 | 14 | 15 |
4 | 16 | 17 | 18 | 19 | 20 |
5 | 21 | 22 | 23 | 24 | 25 |
- 実行後
| 1 | 2 | 3 | 4 | 5 |
1 | 1 | 6 | 11 | 16 | 21 |
2 | 2 | 7 | 12 | 17 | 22 |
3 | 3 | 8 | 13 | 18 | 23 |
4 | 4 | 9 | 14 | 19 | 24 |
5 | 5 | 10 | 15 | 20 | 25 |
- はてな
- chenlina20161130http://www.jordan8.net http://www.raybansunglassess.com.co http://www.tomssale.in.net http://www.denverbroncosjerseys.us.com http://www.truereligionjeans-outlet.us.com http://www.michael--korsoutlet.us.com http://www.nike-rosherun.in.net http://www.canadagoosecanada.com.co http://www.cheaprolexwatches.name http://www.cheapuggsboots.us.com http://www.uggbootaustralia.us.com http://www.coachoutletcheap.us.com http://www.michaelkorsoutletofficial.us.com http://www.oakleystore.com.co http://www.michaelkors--outlet.com.co http://www.katespadehandbagsoutlet.us.com http://www.katespade.eu.com http://www.adidasyeezy350.us.com http://www.tomsshoes.us.org http://www.nike-airmax.me.uk http://www.louboutinshoes.cc http://www.jordan3.net http://www.louis-vuittonoutlet.eu.com http://www.jordan6.net http://www.adidas-yeezy.us.com http://www.raybansunglasses.me.uk http://www.gooseoutlet.us.com http://www.hollistercoclothing.com http://www.bostoncelticsjerseys.com http://www.outlet-uggboots.us.com http://www.niketrainers.uk http://www.ray-ban-sunglasses.com.co http://www.gucci-inc.com http://www.cheapjordansshoes.us.com http://www.aididasyeezy.org.uk http://www.coachhandbagsnew.us.com http://www.true-religionjeans.us.org http://www.oakleys-sunglasses.us.org http://www.timberlandboots.net.co http://www.uggoutlet-stores.us.com http://www.rosherun.org http://www.truereligion-jeans.us http://www.gucci-outlet.in.net http://www.outletcanadagoose.com.co http://www.poloralphlaurenuk.co.uk http://www.coachoutletstoreonlinesale.us.com http://www.uggoutletonline.in.net http://www.uggsuk.org.uk http://www.uggs-pascher.fr http://www.abercrombiefitch.us.com http://www.true-religion.me.uk http://www.cincinnatibengalsjerseys.us.com http://www.coachfactoryoutletmall.us.com http://www.michaelkors--outlet.us.com http://www.uggsaustralia.it http://www.louisvuittonofficial.us.com http://uggs.uggaustralia.qc.com http://www.ralphlaurenoutletofficial.us.com http://www.louis-vuittonoutlets.us.org http://www.mlbjerseys.org http://www.louis--vuitton.us.org http://www.nike-airmaxpascher.fr http://www.christianlouboutin.name http://www.oakleysunglassess.com.co http://www.toryburchoutlet.us.org http://www.uggbootscanada.ca http://www.louboutin.us.com http://www.mcmbags.com.co http://www.adidas.in.net http://www.tommyhilfigeroutlet.us.org http://www.abercrombieoutletonline.cc http://www.asicsshoes.name http://www.nba-jerseys.us.com http://www.polooutlet-online.us.com http://www.tomswedges.us http://www.thenorthface.net.co http://www.raybanoutlet.net.co http://www.raybansunglasses.uk http://www.basketballshoes.name http://www.ugg-bootsuk.co.uk http://www.monclerjacketsuk.me.uk http://www.gucci-outlet.org http://www.louisvuittonlvoutlet.us.com http://www.rolexwatchesforsale.name http://www.hollisterclothing.net http://www.louisvuitton-outlet.ca http://www.michaelkorsoutlet-store.us.org http://www.michael-korsbags.us.com http://www.burberryoutlet.in.net http://www.montblanc-pens.name http://www.cheapjordansshoes.in.net http://www.jordan13.org http://www.retrojordans.name http://www.jordansforsale.in.net http://timberland.officialfree.net http://www.outlet-celine.com http://www.north-faceoutlet.net.co http://www.adidastrainers.uk http://www.miamiheatjerseys.us.com http://www.nhljerseys.org http://www.ugg.eu.com http://www.tomsshoesuk.org.uk http://www.canadagoose-pascher.fr http://www.hogan-scarpe.it http://www.louboutinfemme-pascher.fr http://www.louisvuitton.de.com http://www.poloralph-lauren.us.org http://www.ralphlaurenpolo.in.net http://www.uggsclearance.us.org http://www.cheapuggssale.us.com http://www.nike--rosherun.fr http://www.hilfigeroutlet.in.net http://www.outletcanadagoose.name http://www.michaelkorsoutletclearance.us.org http://www.uggbootsparis.fr http://www.supra-shoes.net http://www.uggoutletsales.us.com http://www.canadagoosejacketsoutlet.us.com http://www.truereligion-jeans.com.co http://www.cheapoakleysunglasses.net.co http://www.louboutinshoesoutlet.co.uk http://www.michaelkorshandbagsonsale.com http://www.abercrombieandfitchoutlet.in.net http://www.moncleroultet.us.com http://www.pittsburghsteelersjerseys.us.com http://www.cheapoakleysunglassess.com.co http://www.outletslouisvuitton.us.com http://www.oakley-sunglasses.net.co http://www.raybansunglassesoutlet.net.co http://www.losangelesclippersjerseys.com http://www.uggcheap.us.com http://www.toms-shoes.cc http://www.louisvuittonhandbagsoutlet.us.org http://www.christianlouboutinoff.us http://www.coachfactoryoutlet-onlinestore.us.com http://www.adidas-nmd.co.uk http://www.cheapraybans.us.org http://www.louis-vuitton-borse.it http://www.gucci--outlet.com.co http://www.redbottoms.org.uk http://timberlandboots.hugeoff.net http://www.michaelkorsuk.com.co http://www.hermesbags.us.org http://www.pandorajewelry.in.net http://www.raybanssunglasses.com.co http://www.niketn-pascher.fr http://www.kevindurantshoes.name http://www.burberry-outletonline.com.co http://www.louis-vuittonoutlet.us.com http://www.canadagooseuk.uk http://www.fitflopssaleclearance.us.org http://www.ugg-outlet.ca http://www.truereligion.net.co http://www.katespade-outlet.net.co http://www.louisvuittonparis.fr http://www.giuseppe-zanotti.us.com http://www.nikeoutlet-online.com http://www.tiffanyandcojewelry.com.co http://www.coachclearance.us.com http://www.canadagoose.com.co http://www.hollister.in.net http://www.airjordan-pascher.fr http://www.fitflops.org http://www.minnesotavikingsjerseys.us.com http://www.uggboots-onsale.us.org http://www.seattleseahawksjerseys.us.com http://www.cheap-jordans.us.com http://www.cheap--nfljerseys.us.com http://www.discountuggboots.us.com http://www.newenglandpatriotsjerseys.us.com http://www.louisvuitton-discount.com http://www.ugg-boots.fr http://www.raybanpascher.fr http://www.ralphlaurenukofficial.org.uk http://www.chicagobullsjerseys.com http://www.gucci.me.uk http://www.coachoutletofficial.us.com http://www.montblanc.com.co http://www.uggoutlet.org http://www.monclerjacketsonline.us.com http://www.monclerpascherhomme.fr http://www.adidasoriginals.in.net http://www.edhardyclothing.in.net http://www.gucci-outlet.net.co http://www.louisvuittonoutletstores.us http://www.jordanshoes.us.org http://www.tiffanyandco.nom.co http://www.coachfactoryoutlet-stores.us.org http://www.adidassuperstar.name http://www.cheapuggboots.org.uk http://www.uggslippers.com.co http://www.longchamp.us.com http://www.uggsoutletcheap.us.com http://www.fitflopsuk.me.uk http://www.replicawatches.name http://www.cheaptoryburchoutlet.com http://www.officialmichaelkorsoutlet.us.com http://www.lebronjames-shoes.net http://www.longchamp-sac.fr http://www.ugg-canada.ca http://www.louis-vuitton.me.uk http://www.sunglassesoakley.com.co http://www.celine-outlet.us http://www.newyorkknicksjerseys.us.com http://www.michaelkorsoutletcanada.com.co http://www.adidasoutletstore.net http://www.christianlouboutin-pas-cher.fr http://www.ugguk.me.uk http://www.michaelkorsoutletstores.us.org http://www.coachoutletonlinesale.eu.com http://www.rolexwatches.us.com http://www.clarisonic.com.co http://www.ray-banssunglasses.com.co http://www.jordan4.net http://www.oakleyvaultoutlet.in.net http://www.oakleysunglasses-outlet.com.co http://www.clevelandcavaliersjerseys.us.com http://www.adidasshoes.net http://www.nikefactoryoutlet.org http://www.mbt.us.com http://www.prada.us.org http://www.ugg-italia.it http://www.curry3.name http://www.uggsboots.us.org http://www.washingtonwizardsjerseys.com http://www.kobeshoes.org http://www.outletmichaelkorshandbags.us.com http://www.dallasmavericksjerseys.com http://www.lebronjames-shoes.name http://www.coachoutletstoreonlineclearances.us.com http://www.cheapraybansunglasses.net.co http://www.toms.us.org http://www.beatsbydrdresolo.us http://www.pradahandbags.net http://www.kobebryantshoes.name http://www.coachfactoryoutlet-online.eu.com http://www.uggclassic.us.com http://www.adidasnmd-shoes.us.com http://www.airmaxssale.com http://www.canadagooseca.us.com http://www.seattleseahawksjersey.us.com http://www.jordanconcords.net http://www.authenticlouisvuittonhandbags.us.com http://www.nikeoutletstores.us.com http:
- http://www.wwwgenericsildenafilonlineusa.com/ generic viagra for sale canada -- sildenafil?
- http://www.wwwgenericsildenafilonlinecanada.com/ generic viagra -- sildenafil?
- http://www.wwwgenericsildenafilonlineusa.com/ generic viagra online canada -- discount viagra?
- http://www.wwwgenericsildenafilonlineusa.com/ generic viagra -- discount viagra?
- http://www.discountsildenafilonlineusa.com/ sildenafil citrate http://www.discountsildenafilonlinecanada.com/ discount viagra -- viagra online?
- http://www.sildenafilcitrateonlinecanada.com/ viagra online http://www.genericviagraonlineca.net/ viagra online http://www.cheapsildenafilonlineca.com/ sildenafil http://www.wwwgenericsildenafilonlinecanada.com/ buy generic viagra http://www.genericsildenafilonlinepharmacy.com/ generic viagra online http://www.genericviagraonlinecan.com/ cheap viagra canada price http://www.cheapsildenafilonlinecanada.com/ viagra online http://www.buysildenafilonlinecanada.com/ viagra online -- generic viagra?
- http://www.cheapsildenafilonlinestore.com/ generic viagra -- viagra?
- http://www.cheapsildenafilonlinestore.com/ generic viagra canada price -- generic viagra online canada pharmacy?
- http://www.cheapgenericviagraonlineus.com/ order viagra -- sildenafil?
- cnZyDV <a href="http://gewbfsvhziat.com/">gewbfsvhziat</a>, [url=http://grlsxcblibrv.com/]grlsxcblibrv[/url], [link=http://mxpsmptlqjsi.com/]mxpsmptlqjsi[/link], http://wnuamaoacutk.com/ -- vfbwmnrhicn?
- THzSNB <a href="http://ksaimwqdende.com/">ksaimwqdende</a>, [url=http://atdbfjbxdykj.com/]atdbfjbxdykj[/url], [link=http://qkzoujzlaqth.com/]qkzoujzlaqth[/link], http://qnmzjxmrxeay.com/ -- psiieraaju?
- pKl2Sn <a href="http://shpkigxpcroq.com/">shpkigxpcroq</a>, [url=http://akcpwypgecdv.com/]akcpwypgecdv[/url], [link=http://cucuefhoqpfv.com/]cucuefhoqpfv[/link], http://uieooxccwesk.com/ -- swaknfxui?
- syYDfb <a href="http://cmbgqrvgzzjt.com/">cmbgqrvgzzjt</a>, [url=http://yvfvmvjzcett.com/]yvfvmvjzcett[/url], [link=http://glhyfybtnixi.com/]glhyfybtnixi[/link], http://jeterbnanmyb.com/ -- bsamjw?
- TLcwWR <a href="http://wxrpwrxoxcaa.com/">wxrpwrxoxcaa</a>, [url=http://qbgqidjrmhds.com/]qbgqidjrmhds[/url], [link=http://dgyyrduriibp.com/]dgyyrduriibp[/link], http://boeulchvshoo.com/ -- elxtptwrl?
- cs5vDG <a href="http://dyhrlvklknhg.com/">dyhrlvklknhg</a>, [url=http://hcbytaodmtcv.com/]hcbytaodmtcv[/url], [link=http://hglkzrluvxui.com/]hglkzrluvxui[/link], http://zszojmkhtqlt.com/ -- yfurkqa?