> Tous les forums > Forum Bureautique
 libre office raccourci clavierSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
TJA435
  Posté le 17/03/2015 @ 15:03 
Aller en bas de la page 
Astucien

Bonjour,

Je n' arrive pas à mettre un raccourci clavier (CTRL + ;) à cette macro :

Sub insertDate

Dim aLocale as new com.sun.star.lang.Locale, vNumFormat

Dim oDoc as Object : oDoc = ThisComponent

Dim oCell as Object : oCell = oDoc.CurrentSelection

Dim sFormat as String : sFormat = "JJ/MM/AAAA"

If oCell.supportsService( "com.sun.star.sheet.SheetCell" ) Then

oCell.setValue( Now() )

vNumFormat = oDoc.getNumberFormats().queryKey( sFormat, aLocale, TRUE )

If ( vNumFormat = -1 ) Then

vNumFormat = oDoc.getNumberFormats().addNew( sFormat, aLocale )

End If

oCell.NumberFormat = vNumFormat

End If

End Sub

Est ce normal ?

Merci pour votre aide.

Publicité
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
22,99 €Clavier sans fil Logitech Wireless Desktop K400 Plus avec pavé tactile à 22,99 €
Valable jusqu'au 26 Janvier

Amazon solde le clavier sans fil Logitech Wireless Desktop K400 Plus à 22,99 €. Ce clavier sans fil dispose d'un large pavé tactile de 9 cm avec navigation multipoint pour un pointage à un doigt simplifié et un défilement vertical à deux doigts. Idéal pour contrôler votre ordinateur à distance, s'il est connecté à une TV par exemple. On le trouve ailleurs à partir de 40 €. 


> Voir l'offre
68,28 €Souris Logitech MX Anywhere 3 (Bluetooth, Unifying) à 68,28 € livrée
Valable jusqu'au 26 Janvier

Amazon Allemagne fait une promotion sur la nouvelle souris sans fil Logitech MX Anywhere 3 qui passe à 63,43 € (avec la TVA ajustée). Comptez 4,85 € pour la livraison en France soit un total de 68,28 € livrée alors qu'on la trouve ailleurs à partir de 90 €. Cette souris que vous pourrez emporter partout avec votre PC ou Mac portable offre une double connectivité sans fil unify ou Bluetooth. Son capteur laser Dark field vous permettra de l'utiliser sur n'importe quelle surface et sa molette débrayable permet un défilement ultra rapide. Prévue pour la polyvalence et la mobilité, vous pouvez appairer cette souris à trois appareils simultanément ! Choisissez ensuite facilement quel appareil contrôler via le curseur placé sous la souris. De plus, grâce au logiciel Logitech Options, copiez-collez des documents et des images d'un ordinateur à l'autre juste avec la souris, même entre MacOS et Windows.

Vous pouvez utiliser votre compte Amazon France sur Amazon Allemagne et il n'y a pas de douane. Si vous êtes perdu en allemand, vous pouvez traduire le site en anglais.


> Voir l'offre
14,44 €16 Piles rechargeables AmazonBasics AAA 800 mAh à 14,44 €
Valable jusqu'au 25 Janvier

Amazon fait une promotion sur le lot de 16 piles rechargeables AAA de sa marque AmazonBasics à 14,44 € seulement. Ces piles ont une capacité de 800 mAh et sont livrés préchargées. Si vous avez besoin d'un chargeur de piles, vous pouvez vous tourner vers ce modèle.


> Voir l'offre

Sujets relatifs
Libre office
LIBRE OFFICE CALC RECAPITULATION
mise à jour libre office
Libre Office Calc_J'aimerais un planning mensuel perpétuel
LIBRE OFFICE CALC
problème impression couleur Libre Office
document writer avec libre office
Mise à jour Libre Office
Alternative à Libre Office
Libre Office
Plus de sujets relatifs à libre office raccourci clavier
 > Tous les forums > Forum Bureautique