go_straightのプロフィール

@go_straight go_straight
ありがとう数4
質問数1
回答数4
ベストアンサー数
4
ベストアンサー率
100%
お礼率
0%

  • 登録日2015/10/24
  • 性別男性
  • 都道府県静岡県
  • Google関連アプリが使用できない

    Xperia ZL2 でGoogle関連アプリが使用できなくなった。 Xperia ZL2を使っているのですが、今日の昼からGoogle関連アプリが全く使用できません。 Play ストアを開くと真白のまま、しばらくすると「認証できませんでした。ログインしてください」というメッセージが出てきます。ユーチューブも同様です。 いろいろと試しましたが、何も変わらなかったので、 サイトで設定のGoogleアカウントの同期を削除するという最終手段を見たので、実施しようと思ったところ、削除を何度押しても何の変化もなく、できません。 関係あるかはわかりませんが、Eメール(au純正アプリ)の受信もできておらず、手動で更新する始末です。 明日の仕事にかなりの支障をきたすので、今日中に直さなければならないのですが、どうすればいいかもう分かりません。 どうすれば治るでしょうか?

    • ベストアンサー
    • IKRSNT
    • au
    • 回答数1
  • 作成したHPをブレビューで開くとエラーが出る。

    エラーの内容は「このページのスクリプトでエラーが発生しました。ライン0・・文字0・・エラープロパテイ’SET Main Css'の値はNull又は未定義で、Fa\uctionオブジェクトでは有りません コード0 URL file;//c:/user/SANAE/Desktop/HPファイル/md_main.b91n.htm・・このページのスクリプトを実行し続けますか。 ・・はい・・いいえ  と出ます。対処方法をご指導下さい。ホームページビルダー17を使って居ます。この様なエラーの出た時の原因は何でしょうか、教えて下さい。

  • WordPress 大文字を小文字にしたい

    WordPress 4.3.1にInvert Liteというテーマを入れてサイトを作成しています。 一部項目のアルファベット表記箇所がすべて大文字で表示されてしまうため、 style.cssのtext-transformでuppercaseとなっていたものを、noneに修正したのですが、 小文字に表示に変わりません。 どのようにしたら変更できるでしょうか。

  • エクセルVBA パソコン変更で動作不能に

    使用するパソコンが変更になり、今まで問題なく動作していたのですが、できなくなってしまいました。 (パソコン環境) 故障によりパソコンは変わりましたが、VISTA、Excel2003という環境は同じです。 (動作内容) 個別の色コードを12個つなぎ合わせて、1つの商品コードにします。 ランダムにピックアップして、400個の商品コードを作成します。 (具体的には) 12箇所の色コードをそれぞれ4パターンの中から1つを選択して、商品コードを作成するものです。 Sheet1には、48個(12箇所×4パターン)のコードを予め用意したものがあり、VBAによって、 Sheet2に400個の商品コード(セル範囲A1~D400)を作成します。 色のコードはあらかじめセル(4種×12面で48個のセル)に入力してあります(手作業で)。 エクセルシートのA列に、たてに48個を入力  ・セル( A3~ A6)にA面の色コード  ・セル( A8~A11)にB面の色コード  ・セル(A13~A16)にC面の色コード  ・セル(A18~A21)にD面の色コード  ・セル(A23~A26)にE面の色コード  ・セル(A28~A31)にF面の色コード          ・  ・セル(A58~A61)にL面の色コード (問題点) 動作しているようなのですが、Sheet2が真っ白のままで終了していまいます。 エラー表示のウィンドウは出てきません。 これまでSheet2には商品コードが400行作成(セル範囲A1~D400)できておりました。 (お願い) 原因が分からず途方に暮れております。解決方法をお願いいたします。 (以下にコード転載します。) Sub 商品コード作成400() Dim ASide, BSide, CSide, DSide, ESide, FSide, GSide, HSide, ISide, JSide, KSide, LSide nTotal = 400 '←コード作成数 sFileName = Range("A1") '←商品の名前(Sheet1のA1セル) '12面分の色コードを配列に取り込む ASide = Range("A3:A6") BSide = Range("A8:A11") CSide = Range("A13:A16") DSide = Range("A18:A21") ESide = Range("A23:A26") FSide = Range("A28:A31") GSide = Range("A33:A36") HSide = Range("A38:A41") ISide = Range("A43:A46") JSide = Range("A48:A51") KSide = Range("A53:A56") LSide = Range("A58:A61") Application.ScreenUpdating = False With Sheets("Sheet2") .Cells.ClearContents For i = 0 To 4095 'パターン作成 4の6乗 4095個 .Cells(i + 1, 1) = sFileName aa = 1 + Int(i / 4 ^ 5) Mod 4 bb = 1 + Int(i / 4 ^ 4) Mod 4 cc = 1 + Int(i / 4 ^ 3) Mod 4 dd = 1 + Int(i / 4 ^ 2) Mod 4 ee = 1 + Int(i / 4 ^ 1) Mod 4 ff = 1 + Int(i / 4 ^ 0) Mod 4 '前半6個の組み合わせ .Cells(i + 1, 3) = ASide(aa, 1) & BSide(bb, 1) & CSide(cc, 1) & DSide(dd, 1) & ESide(ee, 1) & FSide(ff, 1) '後半6個の組み合わせ .Cells(i + 1, 4) = GSide(aa, 1) & HSide(bb, 1) & ISide(cc, 1) & JSide(dd, 1) & KSide(ee, 1) & LSide(ff, 1) .Cells(i + 1, 5) = Rnd() Next i 'ランダムに並び替え .Range("A1:E4096").Sort Key1:=.Range("E1") '不要な分を削除 400個のみ残す .Range("E1:E4096").ClearContents .Range("A401:D4096").ClearContents End With End Sub