Any interest in these commands? They let you select (that is, mark) various
things at or near point. They are most useful in Transient Mark mode - they
act differently depending on whether the mark is active.

* `mark-thing' selects successive things, starting at point. The mark is put
at the same place that command ‘forward-’thing would put it (using the same
prefix argument). If the region is not yet active, then you are prompted
(with completion) for the type of thing to select. The default type is
`sexp'.

* `cycle-thing-region' selects one thing at or near point (just the thing,
not from point through the thing, even if the thing is not exactly at
point). Repeat it to cycle among the thing types - one thing of the current
type is selected at each invocation. The default order of types is `word',
`sexp', `list', `line', `sentence', `paragraph', `page', `defun', `number',
`form'. That order is customizable, and a major mode could also change it to
put the most commonly used types first.

I bind `mark-thing' to `C-M-SPC' as a replacement for `mark-sexp'.

I bind `cycle-thing-region' to `M-@' as a replacement for `mark-word'. (By
default, it does what `mark-word' does without a prefix arg. Unlike,
`mark-thing', however, `cycle-thing-region' does not accept a prefix arg.)

I don't propose these bindings for Emacs generally, but if you use
transient-mark mode you might want to give them a try.

To select successive things in transient-mark mode, you can use
`cycle-thing-region' as an alternative to completion for choosing the thing
type for `mark-thing' - but you need to use `C-x C-x' between the two. That
is, you can use ‘M-@ C-x C-x C-M-SPC’ to select successive words, ‘M-@ M-@
C-x C-x C-M-SPC’ for successive symbols, and so on.

The code is attached.