11/07/02 21:05:30.50 .net
これ ； デリミタっていうんだけどさ、これをつけなきゃエラーになるような
そんな言語使ってる奴ってどうみてもゴミだと思うんだけど
もしかして「；」これ打ち忘れてコンパイルエラー出すのが楽しいの？
そうか、二度と話かけんなよ
死ねよゴミ
458:デフォルトの名無しさん
11/07/21 20:56:49.23 .net
宇宙にはデリミタ派とターミネータ派がいて
10億年も戦争を続けており終わる気配すら無い
459:デフォルトの名無しさん
12/01/14 13:22:56.51 .net
マクロからフォームのテキストボックスの値を取得して変数に代入したいのですが
その方法が分かりません。
ご存知の方いませんか？
460:デフォルトの名無しさん
12/01/26 10:53:37.58 .net
これだと数式として認識せずうまくいきません。
oSheet1.getCellRangeByName("A" & MyRow1).String ="=VLOOKUP(B" & MyRow1 &";'file:///C:/Users/"& myFileDate & "".csv'#$Sheet1.C1:O65536;7;0)"
どうしたらいいのでしょうか？
461:デフォルトの名無しさん
12/01/26 11:10:43.19 .net
自己解決
.Stringを.Formulaにしたら、できました＾＾
462:デフォルトの名無しさん
12/06/07 15:12:26.24 .net
↓のような構造体をVBAサポートモードで動かそうとしているのですが
シンタックスエラー(シンボルが必要)が表示されます。
具体的な解決策をご存知の方いましたら教えてください。
Private Type abc
abc As String
def As Long
ghi As Single
jkl As Double
End Type
463:デフォルトの名無しさん
12/07/16 20:45:03.55 .net
Writerをマクロで紙の縦横の変更ってできないのでしょうか？
ThisComponent.getStyleFamilies().getByName("PageStyles").getByName("Standard").IsLandscape
の値が変更できません・・・・
プリンターパラメーターの変更のほうでも余白やもろもろ変えられても、縦横だけは無理っぽいです・・・
Dim oPrintOptions(0) as new com.sun.star.beans.PropertyValue
oPrintOptions(0).Name = "A4"
oPrintOptions(0).value = com.sun.star.view.PaperOrientation.LANDSCAPE
ThisComponent.setPrinter( oPrintOptions )
つかっているのはOpenOffice3.4.0です
464:デフォルトの名無しさん
12/08/26 14:58:40.62 .net
すいません、すっごい初心な質問なんですが
総てのシートの総てのセルを対象に
特定の文字列が入っているセルだけを背景色を変える
ってマクロはどう書くんでしょうか？
465:デフォルトの名無しさん
12/08/26 16:39:40.28 .net
>>464
条件付書式設定じゃダメなのかい?
466:デフォルトの名無しさん
13/05/09 23:15:55.11 .net
初心者です
Calcのシート上で実行している計算をそのままBasicで実行したいと考えています
いろいろ出来ないのですが単純な"OFFSET"ですら動かせていません
（最終的には"INDIRECT"を動かしたい...）
次のサブルーチンをそのまま動かすとセルA1の値が返されるのですが
aArgs(1),aArgs(2)に0以外の値（例えば1)を設定すると値（例えばB1の値)が
返ってきません。なにがいけないのでしょうか？
Sub test
oFunctionAccess = CreateUnoService( _
"com.sun.star.sheet.FunctionAccess" )
oDoc = ThisComponent
oSheets = oDoc.getSheets()
oSheet = oSheets.getByIndex(0)
Dim aArgs(2) As Variant
' OFFSET(A1;0;0)
sFunction = "OFFSET"
oCell = oSheet.getCellRangeByName( "A1" )
aArgs(0) = oCell
aArgs(1) = 0 ' <- 0を1に変えると""が返される
aArgs(2) = 0 ' <- 0を1に変えると""が返される
aResult = oFunctionAccess.callFunction( sFunction, aArgs() )
MsgBox aResult(0)(0)
End Sub
467:デフォルトの名無しさん
13/05/09 23:54:47.26 .net
>>466
オフセット指定が aArgs(0) のセル範囲外だといけないらしい
上記の場合、A1 の値しか取得できない
468:466
13/05/10 22:09:18.60 .net
>>467
即答ありがとうございます。無事実行できました
単純移植はできないんですね
（考えると"INDIRECT"のパラメータの渡し方は自分には想像できない...）
セルに値を入れてCalcに計算してもらうかCallFunction使わない関数で
作ることにします
ありがとうございました
469:デフォルトの名無しさん
13/12/05 16:43:30.15 .net
ユーザー関数を置いた自分のセルの番地を表示するマクロを作りたいです。
関数で表すと =CONCATENATE(ROW(),",",COLUMN())と結果は同じことなのですが
これをユーザー関数のマクロのみで求めることはできますか？
470:デフォルトの名無しさん
14/06/02 01:06:34.01 xjoqb8w5.net
あるわけねえだろ
ハンカチ仮面って時代を感じる
471:デフォルトの名無しさん
14/07/03 16:32:50.93 fAu/rOzX.net
calcで定期的に再計算させる処理ってループでsleep使いながら
どこかのセル更新するしかないのかな
タイマっぽい時間管理のシート作ってるけど
CTRL+SHIFT+F9押すのめんどいしシート開いてるだけで更新させたい
472:デフォルトの名無しさん
14/07/11 12:38:57.28 c41w+Kkv.net
sub main
do while true
wait 5000
ThisComponent.calculateAll
loop
end sub
473:デフォルトの名無しさん
14/08/14 13:05:43.71 wgwbbbsy.net
>>472
助かりました！
d(ﾟДﾟ)☆ｽﾍﾟｼｬﾙｻﾝｸｽ☆( ﾟДﾟ)b
474:デフォルトの名無しさん
14/08/16 16:35:26.23 HLPR753i.net
URLﾘﾝｸ(www.buzzword.jp)
475:デフォルトの名無しさん
15/04/09 12:11:33.59 toaGspRP.net
「OSDNによれば、同社の経営方針とDice Holdingsの事業の方向性が大きく離れたためといい、
日本側がブランドを刷新することになった。これに合わせてSourceForge.JPのURLもURLﾘﾝｸ(osdn.jp)に変更」
OSSサイトの「SourceForge」が改称へ 「OSDN」に - ITmedia エンタープライズ
URLﾘﾝｸ(www.itmedia.co.jp)
2015年04月08日 14時42分
476:デフォルトの名無しさん
16/02/08 14:59:01.62 rv+8E8Cl.net
普通に3.1.1を使い続けてる
477:デフォルトの名無しさん
16/03/29 08:55:02.83 /c8bAcK4.net
サッカーブッシュ日本代表日程ぷあたん（しゅっちょうまいくろ教育長交代）春文執行40代売上差額シュガーチョコ
URLﾘﾝｸ(www.youtube.com)宇ドナルドアナリストパワーストーンコーチングとしまえん
サッカーブッシュ日本代表日程古本屋よしたけしゅっちょうちょこしゅがー
ディーラー税務署天才開発者死亡詰みヨミドクターマイクロサービス不足
サッカーブッシュ日本代表日程ぷあたんシフト光金さかい強制バイト人権侵害問題
春分資源執行ニューヨーク低原価ぼったステーキソルトレイク福岡横浜新橋奴隷課金パチシフト強制バイト問題新潟米センター生残
コスメ２４チャリティー隠れ40代生活保護プレイボーイバイトレードいたりあん接待問題
マスコミKARDローンケーオーサービス不足婚活パーティー寄付金執行原発ビジネス
FBIチャイニーズタイホテル売上事務所ガチャ決算ガチャキャンペーン（販売報道陣過激派組織向携帯最新情報提供終了
校長発言細心注意ノートン産廃エラー(著作権クレーム中国反応融資高額教育費)(中国捕鯨団体40代社員サッカーコメント
高額入学金ヤフウ新橋大学ヤフウ新橋理事長FX経費 おじや50代資産ガリバズフィード40代エリート